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PCW SHOW DEVANT, SHOW ! 

Les anglais ne sont pas comme nous, lis roulent a gauche, ils organisent des campagnes nationales contre le tunnel sous la manche, ils 
n'arretent pas de dire que tout est "lovely", la publicite comparative est autorisee (slurp !), ils ont des bandes desslnees de Wolinskl dans leur 
metro et leurs salons informatiques sont interessants. Voila du pas ordinaire... 



ben quoi ? 

Je ne sais pas pourquoi, mats 
('Apricot ne prend pas en France. 
Vous files cons, il est vachement 
bien. A peine plus cher que I'Alari 
520 ST (voir ce mot), il est au 
moins aussi puissant mais lui, II 
exists. II a un gem, des drives, une 
souris qui n'en est pas une car elle 
est a I'envers : un trackball. II y en 
a des portables, des en couleurs, 
des avec un drive, d'autres avec 
deux drives, tous avec 512 Ko de 
Ram, Lotus 1-2-3, Multlplan, dBase 
III, PFS File et Open Access sont 
deia sorts, bref, c'est toul bien. 
M enlin. vous faites ce que vous 
voulez, si vous voulez pas acheter. 
achalez pas. 



LE COMMODORE 128 

A I'exterieur de I'expo, a I'interieur, 
dessus, dessous, dedans, a c6le, 
en parrallele, dans un continuum 
spatio-temporel voisin, pailout, des 
panneaux : venez voir le C128. 
Effeclivement. il y en a un, plu- 
sieurs meme. surtout chez Commo- 
dore. Les maisons d'editions arbo- 
raienl toutes flerement des slogans 
du style *je developpe sur C12B et 
j'aime ca", ce qui ne signifie pas 
grand chose car Riles arboraieni 
aussi *je developpe sur Atari, Apri- 
cot. IBM, Philips, Msx. Sinclair, 
Enterprise el toute cette sorte de 
choses et je grends un panard 



leur que le noire. Ah bon, merci 

Etonnant. 

La publicite du Commodore 

c'est 'trois ordlnateurs en un". 




mm$ 



Tout ce speech pour dire que I 'Apri- 
cot est ties rfipandu en Angletetre. 
a juste litre et qu'on trouve des 
programmes a ne plus savoir oil les 
mettre, des promos, des peripheri- 
ques et tout ce qu'il (aut pour le 
transformer en machine a (aver si 
besom est. 



CINOCHE-TELOCHE P a ges i4, ; . 

BIDOUILLE GRENOUILLE 

Ou comment trlcher. plrater, modifier, traflquer, magoufller, 
bldoulller et grenoulller avec les logiclels du monde entier. 
Maim dans fa legallte, au mains ? Of course, mon general I 
Lire page 12 . 



c'est-a-dire que la definition de 
I'ecran doit etre en gros de 12x32, 
ce qui n'est pas terrible, mais je 
peux me tromper, j'ai mal regard! 




plication de la chose : un oromateur ' 
64 Ko, un 128 Ko et un CPM. Par- 
tint de la. j'ai reussl a dew .ibrer 6 
ordinateurs en un dans mon ZX 
B1 : un ordinateur basic, un assem- 
bler, un 1 Ko, un 16 Ko, un 64 Ko 
et un calage de pied de lit. Je suis 
bien content, je savais pas. Basta 
pourleC128. 

BANDE-ANNONCE 

L'Amiga etait expose tout en haul 
du batiment, dans une petite piece 
sombre entouree de demons et de 
cerberes amies de lasers mortels et 
jetant des sorts a tous ceux qui ap- 
prochaient. Vous aurez quand 
mBrne droit a un pre-essat tres 
bientot, tres exactement dans trois 
semaines si les oetits cochons veu- 
lent bien avoir I'amabilitfl de ne pas 
me manner d'ici-la. 



Quesbon de feeling (ca veut i 

sentiment). 

Comme d'habilude avec Phi. (a, 

pub est axee non pas sur 'i i 

chine mais stir les jambes d'une 



LE FtESTE 

IBM fitait la, Victor Technologies 
etait la, Maxell etait la, Sanyo etait 
la, on a tous bu un coup ensemble. 
Apris, on s'est quittes parce que 
tout de m6me, nous ne sommes 
pas du meme monde. 

LES PROLOS 

Un rideau rouge, un passe a exrti- 
ber et on arrive dans la partie grand 
public. La, ca devient vraiment inte- 
ressant et vous allez en baver des 
ronds de chapeau. Paragraphe sui- 
vant, un scoop d'enfer : 

SCOOP D'ENFER 

Clive etait la, Clive, le grand, le 
beau, le noble Clive Sinclair. Ce 
cretin n'a pas trouve mieux que 
d'arrivcr au moment precis au je 
n'avais plus de pellicula ~>onc, si 
vous n'avez ps de photo d I Lui en 
train de tentr I'HHHHebdo avec le 
pouce leve. c'est de sa faute. Tant 



sur tout, ce qui pramet un bon pa- 
quat de softs a venir. Tiens, quel- 
que chose de choquant pour mon 
esprit bien francais bien cartflsien, 
les exposants ne se tiraient pas 
dans les partes. Vous avez un soft 
de gestlon sur Machbro ? Oui, mais 
allez voir en face, le leur est meil- 



Philips sort son pros micro, comme 
tout le monde. II a des drives 3.5 
pouces, un ecran couleur, des pro- 
grammes partout, il s'appelle :VES 
mais II est pas beau et en plus le 
Gem ressemble a celui de I'lBM, 




pis pour Lui, apres tout. II avail 
qua venir plus tot, au lieu de para- 
der comme un couillon et de distri- 
buet des autographesi qui-mieux- 
mieux. 

N'empeche que le Spectrum 128 Ko 
est retarde, peul-etre jusqu'a De- 
cembre, que les employes de Sin- 
clair sont apres tout bien contents 
que Robert Maxwell ait retire ses 
billes, que le QL 2 est dans les 
choux (oil dans les roses, on ne 
sail pas encore si c'est un monsieur 
ou une dame) et que de nouveaux 
softs arrlvent a vltesse grand V 
pour le Spectrum normal, 




N'empeche aussi qu'on a pu voir 
des lecteurs de disquettes 3,5 

6 Duces de marque Sinclair pour QL 
u'est-ce qu'ils ont du insister, les 
sous-fifres, pour que Clive accepte 
ca I Ils ont bien fait. D'autant que 
pour le prix actuel (200 llvres en 
Angleterre, solt 2500 (rants et un 
peu plus de 4000 francs en France), 
le QL devient droTement interessant. 
N'oublions pas que c'est un 16 
bits. 

ON Y VA AU FLAN 

Ben qu'sst-ce qui leur prend, a En- 
terprise ? Un suparbe petit pavilion 
consacre exclusivement a cette ma- 
chine, en plein milieu de la salle 
principale, avec des tas et des tas 




INFO-BD : TOUTE L' ACTUALITE EN PAGE 16 



CONCOURS 

Si Ftomy Ringenboch el Eric Lechat ne se mettent pes Immedla- ^aMmma^aammmmmaaaa^aam^^emmmmmmmmmmmma^amm^e^e^^^ 

tement a genoux pour remarcler dans I'ordre : Dleu, Ceccafdl «t __, „ ,_.,_, .__ . . , 

Hebdogiclel, ce sont des Ingrats. Ils ont gagne. Voir page 20 DEULIGNEURS les faineants SOnt en page 12 



FORMATION A L'ASSEMBLEUR 

Le prof et I'amateur eclair e vous aftendenr en page 24 



C'est nouveau, $a vlent de sortir : 

L'actualile de la micro-iritormatique. Lire pages 9.10,1 1 



DES PROGRAMMES POUR VOTRE ORDINATEUR 

AMSTRAD . APPLE He et He . CANON X-07 . CASIO FX 702-P. 

COMMODORE 64 ET VIC 20 . EXELVISION EXL 100 . HECTOR HR . 

MSX et compatibles . ORIC 1 ET ATMOS . SINCLAIR ZX 81 ET SPECTRUM. 

TEXAS TI-99/4A. THOMSON TO7, TO7/70, ET M05. 



■e^L^BL^MMLVH 



KAVALKAD 



Poursuite effrtinee 0C1 il est prouv6 que le sport stimule 
t'appetit. 



(,£ SptfTitfqoLE 



Laurent GAUTHIER 



Mode d'emploi : 

Joystick dans port 2-stop-rdgles incluses-stop. 



2 REM KRVRLKRD 

.3 REM -::rsi> COPYRIGHT 

4 REM 1985 

5 REM L-GRUTHIER 

6 REM POUR LE 

■:>>!:;■;;!! Ok;.: 

10 sy :-:h L :,.;oy : Y-'n-K£'--,p.2m.- : F0KE5:3281 , 


1 1 5=54272 ■ POKES+5, 95 : POKES+6, 95 : P 
OKES+ 1 2 , 95 ■■ POKES+ 1 3 , 95 : POKES+ 1 9 .■ 95 

:P!>:£S + 20,95 

12 POKES+3, 50 : PQKES+9,70 : POKES+17. 

100 

1 3 PUKES+ 1,6 = P0KE3+8 ■ 6 ■ POKES* 1 i , o : 
POKES. : POKES+7, 1 = POKES* 14, 2 : POKES 
+4,9 

14 POKES+1 1 ,0 :R0KES+18, : POKE;- -: ■ 
5 : PGKES+ 11,65- POKES* 1 9 , 65 : POKES+24 

15 PRINT-JSfflWOTWIUH INSTANT SVP..." 

16 F0KE5 T 5'272)RND240)OR 
14 

17 POKE56334,0:POKEl-PEEKa)AND251 
: FQRfl=0TO5 1 1 : POKE 1 4336+fl . PEEK < 5324 
8+fi):NEXT 

26 P0KEl,PEEK<n0R4:P0KE56334,l 

27 FORfl=0TO7 : READQ: PDKEA+15616, Q : P 
OKE14680+R, : NEXT : P0KE14683, 24 ■ POK 
El 4684, 24 

28 POKE53270, PEEK >;53270?OR16: POKES 
3282,14:P0KE53283,2 

29 DHTH60, 60,255, 231 , 231 , 255,60, 60 

30 FORfi=0TO63 ■ READ0 ■ POKEA+1 4606 . Q ■ 
NEXT 

38 DATA3,7,3,7,3,7,3,7.3,7,3-?,3,8 
7,255,255,0,0,0,0,0,85,255,255 

39 DATR224, 192,224, 192,224,213,255 
-255,224,192/224,192,224, 192.224, 1 
92 

40 DflTFI255,255,234, 192,224, 192- 224 
,192,255,255,170,0,9,0,0,0 

41 DRTFI255,235,175,7,3,7,3,7 

42 PRINT"SCT0H«HOIW''TRB';33>'' 

43 PRINT"ffl«»flaHIM«a»a«8 ,, T^ 



44 PRIHT"iMM"TflBt;31> , "<a(<<C»' , :P0K 
E1183,41 

45 F0RV=2T023 :POKE1024+31+V#40, 38 : 
NEXT 

46 POKE2015, 37 TORR=2016T02024 : POK 
EH , 36 = NEXT : POKE2023 , 35 

47 F0RV=2T023 i POKE 1 063+ Y#40, 34 : HEX 
T 

48 POKES+4 , 64 : P0KE3+ 1 1 , 64 ■ POKES+ 1 8 
,64 

59 REM DONNEES LFIBYRIHTHE 

69 DATA 



61 DATA. 

62 DATA. 
63"i)RTR. 
64 DATA. 




84 DATA 

85"pRINT"3"; 

'■>-. f-'JRH=lT025 ■ READR* ■ FORQ=1TOLENCH 

*}:IFMIB*(fl*,G.l>="."THENPRINT"IIH 

•■; :GOT088 

87 PRINT"H&+"; 

88 NEXT : IFFK25THEHPRINT 
69 NEXT 

90 PRINT-'W i :PRINT"«"TRE<:31)"*.RV 
ALKAD" 

91 PR I NT " 9UMMJW" THE ', 33 > " SCOREMHI 



3ZZ [FPiZi::-.. Ui(^<WV-ia. M-ioVHK.-^r 

URN 

331 P0KEV,PEEKCV>-S:P0KEV+1,PE£K<V 

+1>+8:RETURN 

340 I FPEEK < 1 O23+X+Y*40 > = 1S0THEMRET 
URH 

341 POKEV, PEEK<V)-3: RETURN 

350 I FPEEK < 383+X+Y*40 > = 1 60THEHRETU 
RM 

35 1 POKEV . PEEK (. V >-8 : POKEV+ 1 , PEEK C V 
+ U -8: RETURN 

360 IFFEEK<984+X+Y*40)=1S@THENRETU 



'THE OS)" VIES RN 



DflTfl. . 
ERTfl. . 
DflTfl. . 
DflTfl. 

DflTfl. 
DflTfl. 
DflTfl. 
DflTfl. 
DflTfl. . 
DflTfl. 
DflTfl. 
DflTfl. 
DflTfl. 
DflTfl. 
' DflTH. 
DflTfl. 
DflTH. 
DRTfl. 



92 PRINT' 
3" 

93 POKE53230,2 

99 REM INITIALISATION SPRITES 

100 V=5324S POKfcY+21 , : POKEV, 240 ' P 
OKEV+1,93 

101 P0KEV+28,255:P0KEV+37, 1 : POKEV+ 
3B.7-P0KEV+39.4 

1 02 POKE2O40 ,14' FORR= 1 T07 ■ POKE2040 
+A, 13: NEXT 

109 REM DIRECTION DU JOYSTICK 

110 DRTR2, 7,1,0,4.6,5,0,3,7,0,9,0, 

0,0,0 

111 DRTR2,7, 1,0,4,6,5,0,3,7,0 

112 DIMDC38) :FORfl=0TO26:REflDD':fl.< : N 
EXT 

113 REM ENTREE VARIABLES 

1 14 S-54272 : K=56320 : TN=50 ■ 5V=- 1 i Vfl 
=3 

1 16 FORfl=0TO24 : POKES+fl, : NEXT ■ POKE 

S+24, 15 

120 BDSUB700 ■ Or 

*PEEKCV+30> ■ POKEV+21 , 1 ' GOSUB4300: 

OSUB6000 

129 REM CORPS DU JEU 

130 X=INT<<PEEK<V)~7V8>V=INTaPE 
EK(V+l)-50V3> : Ce=1024+X+V*40-SY33 
7074 

131 IFPEEK<CC>=43THENSC=SC+1' PRINT 
"HMBD(Ha(KW"TflB(.33)SC; :GOSUB4450: IFS 
O366THEN200 

1 32 POKECC , 32 : W=PEEK< V+.30 > : I FWHND 1 
THEN0QSUB236 

133 J=PEEK(K)-10i:ONDU)OOSUB300,3 
10,320-330.340.350,360.379 

134 IF6K8THENIF<5V/80)»INT<SWB0>T 
HENG=Q+1 ■ POKEV+21 , S<Q> 

135 SV-SV+1 : IFXfl=XflNDVfl=VTHEN130 
150 Xfl-X- Vfl=V ■ SYS37025 : OOTO130 

199 REM GflGNE I FIN 

200 fl*=" VOUS RVEZ GflG 

NE ... ":GOSUB6010 

205 GOSUB4500 

210 fl*=" ON REJOUE ... 

r.O/N]?":GQSUB6010 

221 GETfl*:iFfl*="0"THENRUN27 

222 IFR*<>"N"THEN221 

223 fl**" TflNT PIS 

" ■ GOSUB60 1 : FORR-0TO1 000 : NEXT : SYS 
65409 : END 

235 REM PERDU : FIN 

236 GOSUB4700 : Vfl»Vfl-l 

238 IFWRND2THENP0KE253, : P0KE254, 1 
92 

239 I FWRND4THENP0KE 167,0' POKE 166 , 1 
92 

240 IFWflND8THENPOKE169,0POK,E170,l 
92 

241 IFWHND16THENPOKE180,0: POKE 181, 
192 

242 I FWHND32THEHP0KE 182,0: prjKE 1 83 , 
192 

243 I FHHND64THENP0KE 1 84 . ■ POKE t SS ■ 
192 

244 IFWRMD128THENPOKE186,0:POKE187 
,192 

245 SYS37074:W=PEEK<V+30) 

246 FORHS0TO30 : POKE2040, 14 ! P0KE204 
0.15: NEXT 

258 IFVfl-C>aTHEHPOKE2040, 14:RETURH 

259 FORfl=0TO 1 00 : POKE2340 ,14: POKE20 
40, 15: NEXT 

289 fl*=" VOUS RVEZ PER 

DU ! " :GOSUE6010 : GOSU 

B4600:GOTO210 

299 REM DEPLflCEMENT JOUEUR 

300 I FPEEK C 1025+X+Y#40 > = 1 69THENRET 
URN 

301 POKEV, PEEK<V>+8: RETURN 

31G IFPEEKa065+X+V*40> = 160THENRET 

URN 

3 1 1 POKEV , PEEK ■'. V ) +8 : POKEV+ 1 , PEEK ( V 

+1 5+8 ; RETURN 

320 IFPEEKa064+X+Y*40)=168THENRET 
URN 

32 1 POKEV+ 1 , PEEK £V+1 )+S : RETURN 



37 1 POKEV , PEEK ( V ) +8 : POKEV+ 1 , PEEKC V 

+1) -8: RETURN 

490 fl=37051 : H=1O00:GOTG501 

500 H=PEEK(25 V)+f EEK ) ■ S56 : N=PE 
EKt253>+PEEK(254>*256+l 

501 PRIHT"nMS«BI"H"DHTFI"; : F0RH=AT0fl 
+ 15 : PRINTMIDt<STRS';PEEKt:H>>,2>","; 
:NEXT-PRINT"II " 

H R-256*HM'.P0KE 

252 • H;-: : HK=H • : 56 N- 256*HM : P 
0KE254,H^: 

503 POKE 198,10: F0RH=63 1 T0646 : POKER 
, 13:HEXT:PRINT"MGOTO5003":END 

699 REM ROUTINE DEPLflCEMENT 

700 FOKfl=3?025TQ3?l 34 ! READS': POKER, 
Q : NEXT 

701 P0KE251 , : P0KE252, 192 :R0KE253, 
100:pOKE254,191:POKE167,0 : POKE168, 
191 

702 P0KE169, 100:POKE1?0,190:PGKE1S 
J g:POK:E181,190:POKE182,100:POKElS 
3, 189 

703 POKE 184, : P0KE185, 139 : P0KEI86, 
100:priKE187, 18?!: RETURN 

330 I" : TR169,6, 141, 15,212, 141, 17,21 

2, 141tl9,212. 169,246, 141,20,212, 16 

9 

991 DATA65,141, 18,212. 169,64,141,1 

8,212 

1090 DATA160,O, 173,0,208, 145,251,1 

60,1, 173, 1,208, 145,251,230,251 
1001 DHTR230,251,2@8,2,230,252,96, 
162,0,189,17,145,141,248,144,141 
1H02 DRTA255, 144, 141,4, 145, 141,6, 1 
45,24,105,1,141,10,145,189,24 

303 DRTA145, 141,256, 144,24, 105, 1, 
141,1,145,160,0,177,186,141,14 

1004 DflTfl208,160, 1,177, 186, 141,15, 
208,230,136,230,186,208,2,230,187 

1005 2ATA232, 224, 7, 208, 196,96,253, 
167,169,180,182,184,166,2,4,6 

1006 DATH8,18,12,14 

1007 DFITH 104, 128,105, 131, 143, 144,1 
53, 146, 137, 135, 136, 148,96, 113, 121, 
120 

1003 DATA117,96, 146, 129, 149, 146, 13 
3, 142, 148,96, 135, 129, 149, 148, 136, 1 
37,133,146 

1199 REM APPARITION SPRITES 

1200 DHTR1,3,7, 15,31,63, 127,255 
1306 F0Rfl=lT08:REHDS<fl>:NEXT 
1310 RETURN 

2999 REM DEFINITION SPRITES 

3600 FORR=0TO62 i REHDQ : P0KE332+H, Q ■ 

NEXT 

3010 FORfl=0TO62 : READG : P0KE896+R, Q ! 

NEXT 

3020 FORfl=0TO62 : RERBO : POKE960+H, Q : 

NEXT 

3630 RETURN 

3999 REM DHTAS SPRITES 

4000 DflTRO, 0,40, 0,0, 170, 0;0, 235 
4091 DATH0, 0,235, 0,0, 170,0,0,150 

170,0,0,130.0,0,6 

4003 DRTA0, 0,0, 0,0, 0,0,0.0 

4004 DHTR0,B, 0,0, 0..Q, 0,0-0 

4005 DHTH0, 0,0,0, 0,0, 0,0,0 

4006 DATR0, 0,0, 0,0, 0,0,0,8 

4100 DHTR0, 0,40, 0,0, 105,0,0,105 

4101 DRTA0.0, 170,0,0,235,0,8. 190 

4102 DATA0.O. 170,0,0,40,0,0,0 

4103 DATR0,8, 0,0, 0,0,0,0,0 

4104 DATA0, 0,0, 0,0,0, 0,0,0 

4105 DHTA0, 0,0-0,0, 0.0, 0,8 

4106 DHTA0, 0,0,0, 0,0, 0,0,3 

4200 DATA0, 0,136,0, 0,170, 0,0, 25 

4201 DHTH0,0, 170,0,0,60,0,0, 138 

4202 DFITR0, 0,32,0, 0,0, 0,0,0 

4203 DHTA0, 0,0, 0,0, 0,0,0,0 

4204 DRTA0,0,0,0,0,0.0,0,0 

4205 DATH0, 0.0, 0,0, 0,8-0,0 

4206 DflTflS, 0,0, 0,0,0, 0,0,0 
=i?30 REM MUSIGUES 

430S FORfl=0TO4:REHDRH(H>,RL<H>:NEX 

T 

4305 DinBH<29>,BL'::29>,ETc:29;< 



■Y-'r. 



XT 

4321 FORfl=0TO10:REflEPtT<F|:>:fcJEHT 

4440 RETURN 

44'S' F'O'-ES-i-a.. : PijKL>-!-l , ? ' POKE^+5, '.' 

"I -ft 129: RETURN 
4460 POKES+3, 6 : POKES+1 , 6 ■ POKES+5 ■ S 
■ POKES+6, 246 : POKES+4, 65 -POKES+4, 64 
: RETURN 

4 SOil PUKES-f 24 ,15: FOKES+5 , 1 5 : POKES* 
12,15:P0KES+6-15 

4501 P0KE3+ 13, ■ 5 : POKES+19, 15 : POKES 
+20,15 

4505 FORR=0TO29 F?-;-'- EL'..h >+:;"?c^:f:: :■■!■: H 
) )/2 : HX=FK/256 L=FK-HK*256 ' H=HK 

4507 POKES+1 , BHCfl) l POKES+8, H : POKES 
+ 15, H 

4508 POKES, EL ( H ) : POKES+7 , L : POKES+ 1 
4 , L- 1 : POKES+4 , 32 = POKES+4 , 33 

4599 POKES+ 11,32: PQKES+ 1 1 , 33 : POKES 
+13, 32 : POKES+18, 33 : FORT=0TOBT<fl>*2 
00 : NEXT i NEXT 

4510 GOTO4800 

4600 POKES+24,15:pOKES+5,15:POKES+ 
12,15:P0KES+6, 12 

468 1 POKES+ 13,10: PQKES+ 19,10: prjKES 

+20,9 

4605 FORfl=0TOI0:FK=<MH(fl)*256+ML<fl 

> > *2 : H"/.=F"/./256 ■ L=F^-256*HK 

4607 POKES+1, H?::pOKES+S,(-fHtH.> -POKE 

S+15.HK 

4609 POKES, LPOKEL 

4 , L-10 : POKES+4 . 32 F ( iKES+4, 33 

4609 POKES+1 1-32: POKES+1 1,33 :« IKE 
+18, 32 : POKES+18, 33 : FORT=0TOMT<R>*2 
00 : NEXT : NEXT 

4610 GOTO4800 

4700 POKES+24 , 15 : POKES+3 ; 20 = POKES+ 
10,50 :pOKE3+5, 15 :P0KES+12, 15 :POKES 
+6,10 

4701 POKES+13, 10:POKES+19,15:POKES 
+20,15 

4704 FORfl=0TO4 H'+RL(fl> 
-i/2 ■ HK=FK/256 : L=F^-256#H/: 

4705 POKES+1 , RH^AJ : POKtS -Z- ■ Hi--: H::'!' 
3+15, RH^H? 

4706. POKES , RL C R> : POKES+7 , L : POKES+ 1 

4 , RL ( fl )- 1 : POKES+4 , 64 : POKES+4 , 65 

4707 POKES+ 1 1 , 64 : POKES+ 1 1 , 65 : POKES 

+18, 36 : POKES+18, 37 :FORT=0TO100: HEX 

T : NEXT 

4809 POKES+4 , 32 : POKES+ 11 ,32 : POKES+ 

IS. 32: RETURN 

5090 DATRI6, 109, 17, 183, 13,203,6.23 

2,10,89 

5018 DRTA17, 193, 17, 103. 16, 109, 16. 1 

09, 14, 162, 13,299, 14, 162. 17, 103 

5011 DHTR17. 103. 17, 103,16,109,16,1 
09,14,162,13,208,14,162,19.137 

5012 DFITR16, 109, 19, 137, 17, 103, 16, 1 
09, 14, 162, 14, 162, 17, 103, 16, 109, 14, 
162 

5013 DFITfll3,208,13.208,12,73,13,20 
8,14,162 

5814 DflTfll, 1, 1, 1,1, 1,1, 5,1,1,1. I. <1 
,1,1,6,1,1,1,3,4,1,1,1,3,4,2,3,4,6 

5020 DATR4,90,4,90,4,90,4-98,5.45- 
4,226,4,226,4,90-4,90,4,27,4,90 

5021 DflTflS, 2, 1,4,2, 1,2, 1,2, 1,4 
5900 REM PRESENTATION SCROLLING 
6000 SOTO7800 

6801 At=" VOUS DEVE2 PPRCOURIR 
LE LHEYRINTHE SRNS VOUS LAISSER R 

RTTRRPER" 

6802 R$=R*+" PRR LES BESTIOLES QUI 
VOUS SUIVENT R LA TRACE." 

6093 A*=Af+"VOUS DISPOSES POUR 

Ft DE 3 VIES.LE JEU SERR TERMINE QU 

6004 AS=fl*+"VOUS flUREZ MRHOE TOUTE 
S LES PASTILLES. BONNE CHANCE... 



6610 F0Rfl=lT0LEH'iR*>-6:PRINT 
"t.3.b<32)mid*<a*,4»7J 

■ T NEXT: RETURN 

v.- m=" DES INSTRU 

CTI0N3 [O/N]?" : GOSUE6010 

7010 GETRJ::IFfl*="O"THEN6001 

7020 IFfl*O"N"THEH7010 

7830 fl*=" .... ATTENTION: Cfl C 

OflMENCE ":GOTO6010 • 



RUNNER 



Laissez-vous surprendre par I'originalite de ce RUN- 
NER et armez-vous de patience, vous n'etes pas pret 
d'atteindre le 25eme tableau. 

Mathieu MARCIACQ 
Mode d'emploi : 

Avant lancemenl, tapez FSET 527 puis INIT# 1 , "LIST" 500 
Apres RUN, choisissez (J)ouer ou (C)reer. 

(J) Le jeu (environ 13 Ko) : vous devez parcourir 25 tableaux malgre 
les canons qui vous tirenl dessus, les monstres qui vous suivent et 
les murs mobiles qui cherchent a vous enfermet. De plus, vous ga- 
gnerez vies et points en comblant un maximum de trous a I'aide de 
blocs noirs. A noter qu'un empilage judicieux de ces blocs, vous 
permet d'atteindre certaines echelles (possibilite de pousser deux 
blocs en meme temps). Le deplacement de votre personnage s'ef- 
fectue a I'aide des touches flecnees : 

- gauche et droite; deplacement dans les directions correspondan- 
tes, 

- haul et bas; pour (aire un bond, monter ou descendre une echelle. 

- les deplacements intermediates (par appui simultane sur deux 
touches) permettent de monter ou descendre de quelque chose 
dans la direction indiquee. Remarque : les tableaux sont TOUS rea- 



CANON X07^ m -»*.*& 



lisables... 

(C) Editeur de tableaux : Le programme demande le numero du ta- 
bleau a modifier. Repondez par un nombre entre 1 et 25 et attendez 
I'appantion du tableau concerne. Placez le curseur clignotant sur le 
carre que vous desirez modifier et pressez la louche de fonction 
correspondant a la partie du decor que vous desirez placer a cet 
endroit. 

ESPACE permet d'effacer 
M place un mur 
E place une echelle 

B place un BOUT dechelle (plus esrhetique). 
C place un carre noir 

T place un canon; ne tire que place sur la deuxieme ligne de 
I ecran. 

Le tableau acheve, tapez RETURN et attendez la fin de la compili 
tion (mise en DATA). 



En rai&on de la longueur in- 
habituelle du listing, ce pro- 
gramme passera en plu- 
sieurs fois. 




90 BEEP10, 1 :BEEP30, 1:BEEP5, 1 : PT=PT* <TA+- 
>*10:Y=YZ:IFPT>C»THENUI=VH-1ELSE200 

91 IFVI>9THENvT=9 

92 BEEPlO,3:BEEP50, 1IBEEP4, 1 : CV=CU*1 . 5: 
2 NEXTX, Y:L0CATE9,3:PRINTES ! NEXT : NR-1 : GD L0CATE19, O: PRINTUSING' H" ; VI i 
SUB7000:NR=0 200 IFSA=0ANDUP»0ANDS2=OANDY<3TH£N79O0 

252, 132,72,48, IB, 72, 132,25 210 IFSCREEN (X , Y> =131DRSCREEN {X , Y) =132TH 



EXECS<HEE33:DEFINTA-Z:TA«O:G0SUB80O0:VI 
=2 ! 0NERRORG0TD70OO 

1 CONS0LEO,4,0,0,O:DIMC(24, 18,3) :F0RE=0T 
024:FDRY=OT03:FDRX=0T018:READC(E,X, Y> 



7010 RESUME3 

7900 IFSCREENIX, 

HEN210 

7910 IFSCREENtX, 1 



1310RSCREEN< 
>«32THENY=Y+ 



I, Y)=132T 
: G0T020O 



3 FONT* 
2 " : DNERRDRGOTOO ENX=X 

4 F0NT*C128>=-"120, 72, 120,72, 120,72, 120,7 220 IFT1=0THEN260 
2 230 IFPZ=OTHENPRESET(XT,YT 

5 FONTS! 129) = "252, 204, 120,72, 120,72,252, 231 YT=YT+4 ! PZ=P0INT ( XT , YT 
204 232 PSET(XT,YT 

6 FDNT*U30> = "120, 120,48,232,48,72.72,20 EMPRESET (XT, YT. 
4 Z40 IFINT(XT/6>=XANDINT(YT/8)=YTHEN2000 

7 F0NT*(132)="252,252,252,2S2,252,2S2,23 245 IFDG=1 ANDINT ( XT/6 ) =XI ANDINT I YT/8) =YI 
2, 252 "I IFA*="CTHEN9000 THENDG=0: LDCATEXI , YI : PRINTCHR* (PI ) ; 

8 G0SUB50O0:GOT011 250 BEEPYT, l:GDT0290 

9 Y=O:XQ=X:SA=O:S2-0:UP=0:P=129:P2-32:Pl 260 IFSCREEN<X, 1 ) =134THENT1-1 : XT=X*6+2I Y 
=32: DG=0: G0T01 1 T=1 j . G0TD290 

10 XB=X:Y=3:SA=0:S2=0:UP-0:P»129:P2=32:P 270 XT=RND( 1 )*19: IFSCREEN IXT, 1 ) 0134THEN 
1=32: DG=0 290 

11 T1=0:CLS! IFTA-23THEN3000ELSEIFTATHENM 2B0 XT=XT*6+2J YT=1 1 : Tl=l 
I = 1ELSEIFMI-0THENX-0:Y=>2:P«32 290 IFTA< 6THEN50O 

20 FORI=OT03:F0RJ=OT018:O=C(TA,J,I):IFOT 300 IFTAO6ANDTAO8ANDTAO16THEN370 

HENLOCATEJ, I : RRINTCHR* ( D+127 ) J 310 XM-RND < 1 ) *19: YM=RND ( 1 > #4 : IFSCREEN (XM 

30 NEXT:NEXT:T*-RIGHT*CO"+MID*(STR*(TA + , YM1O131THEN500 

21,2) :LOCAtE19, l:FRINTLEFT*IT», 1)1 320 F0RDX=-1T01 : FORDY' 



7920 G0T021O 

8000 CLS!C=STR1G 
)nuer ou lOre.r 

8001 A*=INKEY*:X=RND(0):IFA*= 

8002 BEEP10,2:PRINTA* 
8010 RETURN 

FYT>23THENTl=O:lFPZ-0TH 9O00 CLS: INPUT"No du tableau 

9001 cls:c0nsdle0,4,0, 1, 1 

9002 dr=i:ta=n-i:gosubh 

9011 X1=X:Y1=Y 
9020 A»=II 



:PRINT"Voulez vous (J 
THEN8001 



IFA*=CHR*<29)f 



>0THENX 



GHT*<T*,1) CLOCATEJ 



LOCATE19,2:PRI[ 
O: PRINTUSING"*" 
I 40 ONERRORGQTDO 

41 IFDRTHENDR=0:RETURN 
I 50 Xl=x: Y1=Y 



70 IFC-3THENX-X-H:IFX=19THENX=18 

IFC=4ANDX<18ANDY<2THENIFSCREEN<X+1,Y 
=32THENX=X+l:Y-Y+l 
72 IFC=6ANDX>OANDY<2THENIFSCREEN(X-l, Yt 

-32THENX-X-1 : Y-Y* 1 
SO IFO7THENX*X-l:lFX=-lTHENX*0 

90 IFC=2ANDSA=0ANDX<17ANDYTHENX-X+l:Y-Y 
1 : IFSCREEN I X , Y ) <> I 31 THENSA-1 : GOT01 1 O 

91 IFC=2ANDSCREENtX,Y)=I31THENX-Xl:Y=Yl; 

c=o 

100 IFSA=1THENSA=0: IFSCREEN tX+l,Y+l)<> 
lTHENY=>Y + l:x=>X + l 

110 IFC«lAND(P-12B0RP-129)THENY=Y-l:MO> 
IFC=8ANDS2=OANDX>OTHEN112ELSE113 



320 F0RDX=-1T01:F0RDY=-1T01: IFDX*DYTHEN3 
330 IFXM4-DX^oaRXM+DX>18DRYM+DY<O0RYM+DY> 



340 ifscreen (xm+dx, ym+dy ) ">32then360 
3so locatexm, ym:print" " ; : locatexm+dx, ym 
*dy:printchrs(13D ; :dx=i:by*i 

353 BEEPIO, i:BEEP50, 1 

360 next: next :got0500 

370 iftaohandta< >13andta<>19andta<>17a 
ndta<20then5o0 

380 ifdg=*othenxi=rndi0)*18: yi=rnd(0)*3:p 
i=screen (xi , yi > : ifpi=32thendg=1else500 

381 ifpy-0thenpy=3! got0390 

382 py=py-i:gotdsoo 
390 di=sgn(x-xi) : dj=sgn ( y-yi ) 
393 ifscreen i xi +di, yi +dj ) =1310rscreen ( xi 

; +bi, yi+dj)=132thengosub50000: ifnhthen393 

396 NH=0 
3 4O0 LOCATEXI, YI : PRINTCHR* (PI ) } :XI=XI+DI: 

yi=yi+dj:pi=screen ixi , yi ) 

1 410 LOCATEXI, YI!PRINTCHR*( 135) J :IFXI=XAN 
DYI-YTHEN2000 



903O IFA*=CHR*<28>ANDX<>1BTHENX=X 
904O IFA*=CHR*(30)ANDYOOTHENY=Y- 
9050 IFA*=CHR*(31)ANDY<>3THENY=Y+ 
9O60 IFA*="E-THENPa=CHR*(12B 
9070 IFA*«"B"THENP*=CHR*(129 
9080 IFA*="M"THENP$=CHR«(13I 
9090 1FA*="C"THENP*=CHR*(132 
9100 IFA*=-T"THENP*=CHRS(134 

9110 IFA*=CHR*(13)THEN9500 

9111 IFA«=" "THENP*=." ■ 

9120 LOCATEXI, Yl:PRi N TP* i: p«= C HR* (SCREEN 
IX, Y) ) :LDCATEX,Y: PRINT-. " j 
9130 G0TO9011 

9500 P"»=lO00O+lO00#(N-l> 

9501 LOCATEXI, Yl:PRl NTPS . 
9505 DELETE-LIST" 
9510 INIT#l,»LIST-,SOO 
95SO F0RY*0T03;PRINT#1 

9600 FORX=OT018:S=SCREEN(X Y) ■ 
S=0ELSES=S-127 

9601 0UTtH,Si-48 

9610 IFXOlSTHENPRINTttl,", "i 
9620 NEXT:0UTItl,l 3:NEXT: p RINTM 
R*(13) i 

9629 CLS 

9630 INIT*5,''LIST'':EXEC8<HEE1F:END 
10000 DATAO, 0,0, 0,0,0,0,0, 4." " " 
z . 4 . 4 ,4 
*00Ol DATA0,O,0,O,0, 0| 



C'est le numero cent? un a 
tenu jusque Id ? Les bras m'en 
tombeni. Done les mains, done 
les doigts et quand mes doigts 
se sont casses la gueule et gi- 
sent Immoblles sur le' sol, j ai 
du mal a taper sur mon ordina- 
teur pour ecrlre cet edlto. Done 
pas d'edlto dans le numero 
cent, ca me permettra de 
m'adonner a mon sport favor i : 
ne rien faire. Et ga m'evitera 
egalement de verser dans mon 
vice favori : I 'auto-satisfaction. 
Vous ne lirez done pas les 
lignes pre tori Houses auxquelles 
vous vous attendiez, des 
lignes style : "Dans la press© 
micro grand public, nous 
sommes les seuls a avoir at- 
taint le numero 100, meme 
I'Ordinateur Solitaire n'en est 
qu'a son numero 73" ou "J'en 
connais des canards de micro 
que quand I'informatique sera 
morte et enterree depuis long- 
temps, ils en seront encore au 
numero deux" ou encore "Qui 
veut voyager loin ne doit pas 
cortfondre servile catalogue 
(pay ant) et journal indepen- 
dant". 

Vous ne verrez pas non plus 
des jeux de mots [aids (qui 
font les gens betes) avec 100, 
cent, sang ou sans. 
L'edito commenlOO par "Bon 
100 de bon 100, meme 
HerlOO ne serait pas au 100" 
ne sera pas pour aujourd'hui. 
Bref, pas de bras, pas d'edito, 



edito 



Gerard CECCALDI 






112 IFC=BANDS2»0ANDY>0THENX-X-l:Y»Y-l;lF 411 IFPI=130THENPI=32 
SCREEN (X, YK>131ANDX>1THENS2»1:G0TD120 500 LOCATEXI , YI : PRINTCHR* (P) 

113 IFC=8THEN IFSCREEN (X,Y 1=1 3 1THENX"X1! Y ,V) ! LOCATEX, Y: PRINTCHR* ( 130) 
-Y1:C=0 501 IFY=3ANDP=32THEN2000 
115 IFS2-1THENS2=0:IFSCREEN(X-1,Y+1K>13 303 IFP=133THEN2000 
1THENY=Y+I:X=X-1 510 G0T05O 



=SCREEN(X 



120 IFC»5ANDY-3THENTA=TA- 

IFY=3THEN128 
122 IFC-5AND(SCREEN<X,Y+1 

1)-129)THENY»Y+1 
128 IFY»-1THENTA-TA+1:60T 



i : G0T09 
-1280RSCREEN0 



looi fori=otdiooo:nexti:end 

2O00 BEEPY#2, l: LOCATEXI, Yl:PRINTCHR*(P) ; 

2010 xmx: yi=y:p=screen(x, Y) :locatex,y:p 

RINTCHR*1133) | :Y=Y+1 
IFY=4THEN2020 



1,0,1 

10002 DATAO, O, 0,0, 0,5,0,0 
1,0,0,0 

10003 DATA4,4,4,4,4,4,4 4 
4,4,4,4 

11000 DATA4,2,4,4,4,4,4 4 
4,4,2,4 

11001 DATA7 : 



■,4,7 : 



IFC= lANDUP«OANDM0iOANDYTHEN IFSCREEN ( 2012 IFSCREEN (X, Y ) =32THEN2000 
l)=32THENUP-l:Y-Y-l:GOT0150 2020 FORI =0T02O: BEEP I#7, 1 : BEEP I#2, 1 : BEEP 

1*3, 1 : NEXT: CLS I PR INT 'Total : ";PTi -pciintB 



140 ifupthenup-o:y-y+i 

150 1FSCREEN(X,Y)0132THEN200 
IFX+SGNIX-XlKOORX+BGN<X-) 



2060 1FC(TA,X,3)-10RC[TA,X,3)=2THENIOELS 130M DA ™' "' 4 > 4 - 4 . 4 , 4, O, O, O 



S:PRINT:PfMNT" Voui >v*X »n# i n 



INE(I,I/4I- 



2021 PRINT"V1«E :-FVI 

18THEN2 2025 A=STRIG(1) 

2030 IFINKEY*-""THEN2030 

132 IFSCREEN (X+SGN (X-Xl ) , Y) "1310RSCREEN ( 2040 Ul'VI-l: IFVI >-lTHENX=XQ: GOTD2060 

X*SGN(X-X1>,Y)-133THEN200 2O50 RUN 

159 BEEP20O,l 

160 x2-x+sgn<x-xi»:locatex,y:printchr«(p e? 

-1»!:P3-SCREEN(X2,Y>:L0CATEX2,Y:PRINTCHR* 3000 

132); 

61 C<TA,X,Y)-P2-12:7:IFC(TA,X,Y)<0THENC( 3003 FORI-OT01000! NEXT 

TA,X,Y)"0 3010 FORI>OTOsO:BEEPI*2, 

162 P2-P3JIFP3-134THENP2-32IP3-32 , 31-1 /4I : BEEPl , 1 

163 C1TA,X2,Y»-S 3011 LINE 1 1 , I /4» - f 1 19-1 , 1 /41 : BEEPI*7, 1 : L 

165 IFP2-131THENL0CATEX2,Y:PRINTCHR*U31 INE ( 1 , 31-1/4 > - { 1 19-1 , 31 -I /41 :BEEPI*9, 1 

H : X-XIt LOCATEX, Y!PRINTCHR*( 132) I 3020 LINE ( 1 19-1 , 1 /4) - 1 119-1 , 31-1/4) : NEXT 

166 IFP2-131THENC(TA,X2,Y)-4:CCTA,X,Y)-3 3030 L0CATE7, 2: PRINT-OUF ! " ! FORI-1T020: BE 

169 IFY-3THENY-Y1 : GOT0200 EPI*3, 30/ I ! NEXT: CLS 

170 IFSCREEN(X2,Y+l>O32THEN20Q 304O END 
V2= * Y 50OO FONT* 1 1 33 > - - 32 , 32 , 24B . 32 . 32 . 32. 1 12 . 

172 IFY-3THEN190 Z3 2 * ' 

173 IFSCREEN<X2,Y+1K>32THEN190 5001 FONT* ( 134) -"248, 1 12, 32, O, 0, O 0,0 
ISO LQCATEX2,Y + 1.-PRINTCHR*<132> CLDCATEX 5003 FONT* < 133) *»204, 48, 232. 48. 4s! 120 72 

' ! PRI NTCHR* t P2) | p 20A 

CITA,X2,Y*1>-3:C1TA,X2,Y>-P2-127:IFC 5010 RETURN 
<TA,X2,YK0THENC(TA,X2,Y)=0 7000 X-0: Y=2: P2-32: P-32: XQ-O! YB-2: CV-100 

+l:GOT0172 7005 IFNRTHENRETURN 



11002 DATAO 
0,0,4,4 

11003 DATA4 
2,4,4,4 

12000 DATA4, 
0,0,4,4 

12001 DATAO, 
4,0,7,4 

12002 DATA0,O,0,O,5 
4,4,0,0 

12003 DATA4, 2,4,4,4,4,0 
4,4,2,4 



1 7 > 4 , 4 , 4 , 4 , 4 , 4 
5(0,0,0,0,5,0,0 
4>4, 0,4, 4,4, 4,0 
4 .4, 4, 2,4,4,0,0 
0,0,0, 1,0,7,0,4 
0(0,4,4 
4,4 



0,4 

13001 D»TA4,4,0,7,7,7,7,0,2 4 
4,4,0,0 

13002 DATA*, 4, 4, 0,0,0,0,0, 
0,0,3,0 

13003 DATA4,4, 4, 4,4,2,4,4, 4 4 
4,4,4,4 

14000 DATA4, 2, 4, 0,0,0,0,0, 0,0, 
0,0,0,1 

14001 DATA7, 1,7,0,0,5,0,0,3,0 
4,4,4,2 

14002 DATA4, 1,0,0,4,4,4,4,4,4 
0,0,3, 1 



182 P2=32:Y»' 




BEBETE SHOW 



Capturez par de savants calculs, I'ignoble bebete qui 
hante votre grille. 

Christophe LAURENT 




L'UttoBte 6e'bette 



'AMSTRAD 







16 REM **************** 
20 REM * * 

38 REM * LH BEBETTE * 
48 REM * * 



50 REN * 

60 REM * » 

70 REM * C. LAURENT * 

88 REM * * 

90 REM **************** 

100 REM initialisation 

\HUSff3Svt'u»fm iSAs SSS cuVi.iwoimzE tim..ih» 



230 LOCATE 12,17'PEN 1 'PRINT "Diff OP X=I OR M-l THEN r< x, i >=I! ■■': 
icult* ' "'PEN 8'LOCRTE 5,28'PRINT 9)+l ELSE r( x.m 3=INT(PND*10) 'GQTU 

"facile (1)" 570 

260 LOCRTE 5, 22 'PRINT "mo»*n (2>"' 360 xbb=x' abb-a 
LOCRTE 5,24'PRINT "difficile (3) ' 570 NEXT * ' NEXT x 'GOSUB £120 

"■GOSUB 22ie ! dif«VHL<*»> 588 REM init. definitions 

270 LOCRTE 21,24'PRINT dif'IF dif< 390 x-4' »"3'UIND0U #1, 1,39. 16,23'P 
1 OR dlf>3 THEN 260 fiPER «,Z-tW»*»TIHE 

280 FOR i=.l TO 2080'NEXT i'CLS 680 IF Vtj-S THEN 2250 

290 REM creation Grille 610 DIM-'Bftl0,4> 

318 DIM Kh+l,u+l)'DIM Kh+l.u+13' 620 FOR t-'l TO lB'DFC i, 1 3=i 'REHD D 



.,1,1.5.3 



120 PEN 1 'LOCATE 1,10 'PRINT ' 



Ik re«l*»" 



138 PRINT'PRINT 

148 PRINT'PRINT - ou «u ■ 

GOSUB 2220 

130 MODE 1'INK 0,14'INK 1,0'INK 2. 

26' INK 3,6'PAPER 2'PEN 1 'CLS 

168 IF UPPERX a* >"°0" THEN h> 

5'ln-4'G0TO 298 

178 Premol'DIM u.n*(63'un«( I 3-"unit 

e»"'unS(2>""diz»lne»"'un«K33-"cent 

aims" 'u.nK4>""williei-*"'unS(5>-"d 

izaine* d* miniera"'unS(63-"eenta ™_ IF r < 



+2*vFRINT K'NEXT i 

330 FOR x-1 TO h< LOCATE 2+2*x,l'PR 640 NEXT 1 

INT CHR»Cx+64 3NEXT x 658 FOR i-1 TO IB'REHD DF<i.33't 

340 PEN l'FOR ¥-376 TO 376-v*32 ST A .8, .0. .8, . 1 , .083, . 1 . .25, .23, . : 



EP -32 

330 PLOT 38,a'DRAW h*32+38 , » . 1 

369 NEXT a 

370 FOR x=38 TO h*32+38 STEP 32 
.» 380 PLOT x.3?6'DRAU x,376-u*32 

390 NEXT x 

t 480 FOR M-l TO vFOR x-1 TO 



'GOTO 440 



In AND RND<0.8 THEN 



lilli. 



I. PRINT "entt-ee *"•*££& 



188 CLS.'LQCATE IB. 

das DIMENSIONS" iaft'MFXT** ■ NFxt"«™ ' " "" " 

198 PEN B'LOCATE 5,5'PRINT "Honzo *J™ ™ T *. ™ h FflR «i TO „ 
ntale-nent ' "; 'GOSUB 2210- «« ^^' y ^i BTHFN 4*0 

^| ASC(A ( K4 8 OR ASC<A.»57 «8 IF K^Wfl J*}^ 590 

200 LOCATE 24,5'PRINT all i GOSUB 22 

10'PRINT *S'm*=M*+a»'H-VAL<m«3'IF 

h>17 OR h<3 THEN 190 ««o i=o 

210 LOCRTE 3,8'PRINT "Verticalemen 380 NEXT a 'NEXT x 

t ' "'GOSUB 2210'U-VAL(a»)'LOCA 518 IF Prea=*0 THEN 

TE 21,8 S0*r€I.< 3-HiC 

228 PRINT vIF v>6 OR v<3 THEN 210 320 FOR x-1 TO h'FOR w=l TO 

238 LOCATE 3,13'PEN 1 'PRINT "Lonau 530 IF Kx, 



660 NEXT 1 

670 REM editeui 

680 PEN l'PEN 111,1 'LOCATE x,y-x9=x 

#16-19 '4>9-419->l*16 

690 xt«x/2-l'i*t»INT(s»^2) 

708 *i-INKEYI'IF *•<>"■' THEN 778 

710 cal«0'GOSUB 1768'COl=2'GOSUB 1 

76B't-i+l'IF i>60-dif#10 THEN i=0= 

'i+l'GOTQ GOSUB 1880 

720 IF xbbOxt OR nbbOst THEN 700 

'2 THEN r 738 ENT 1, 127, 1, 1 1 'SOUND 1.16,1397 

'=18'i=0 ,7,0,1 

740 FOR i»l TO 3'FOR ii=4 TO 1 STE 
P -l'PEN il 'LOCATE x,* 'PRINT CHRSC 



ELSE r 



224) 



EXT i 



jl-i 'GOSUB 1760 



des nombres < "'GO ,2*41 + 1 'PRINT CHR*(2073' 
SUB 2218-ln-VALCa*3'LDCATE 35.13'P OTO 570 
RINT In 540 J(x,n>— 1 

n>6 OR ln<2 THEN 238 530 IF r(x-l,»>=10 OR r 



760 CLS HI 'PRINT »1,"U twbette a 
d«truit votre curseur"' PRINT ttl,"e 
t vous avez PERDU. "'GOTO 2180 
770 IF *i- N *' THEN PEN 2'PRINT a* 
ELSE 800 
'=10 THEN LOCATE 2*x+2 780 IF j<Kt.»t 3-10 THEN d=0 



820 IF ASC<«*)»242 AND x=4 HND JCh 

,MtK18 THEN x»h*2+2'G0TO 680 

830 IF ASC(al>="240 RND v>3 AND Kx 

t,ut-lK10 THEN n»»i-2'G0T0 680 

840 IF HSC<»»)=248 RND y=3 AND liX 

t.wXIB THEN u=v*2+l'G0TQ 680 

830 IF ASC<a«>-243 AND x<2*h+l AND 

j(xt+I,utK18 THEN x=x+2'GDT0 680 
968 IF H8C<.*»>=243 AND x=2*h+2 FIND 

jCl.MtKlO THEN x=4'GOTO 689 
870 IF HSCCa*)='241 HND s<2*v+l HND 
J<xt,wt+1K18 THEN j=j+2'G0T0 £80 
888 IF RSC<at>=241 AND y=2*v+l AND 

J(xt,l><10 THEN a=3'G0TO 688 
890 IF UPPERK *• >"V" THEH 950 
980 IF UPPER*Ca*>="D" THEN col=2'G 
OSUB 1760'GOTO 1B28 
910 IF UPPERK*«>»"R" THEN PAPER 2 

'CLS #1' PRINT #1. "abandon ? ..."'G 

OSUB 2220'GOTO 2180 

920 IF nSCt»*K48 OR flSC(a*)>57 OR 

Kxt,nt»9 THEN 680 
930 PEN fl'LOCATE x.s^PRINT **'J(xt 

,s>t)=ASCCa«)-48'PEN 1 

948 GOTO 680 

950 CLS KI'FQR xb=l TO h'FOR Mb=l 

TO if 

968 IF Kxb,»bJ=ia THEN 1000 

970 IF j(xb,ab>=-l THEN 1000 

980 IF Kxb, yb>=j':xb,ab) THEN PEN 

1' LOCATE 2.i.S-,K -.'<::■■, .; PRINT CHRK 

48+Kxb,yb))' J(xb,ab>=10+Kxb-Mb>' 

scor=scor+lGOTO 998 

985 IF r(xb.»b)+18=JtXb.Mb) THEN 9. 

90 ELSE er=er*l 

930 IF J<xb.nbi=ie THEN dr4=ld=33 



■cl,l>-3'» 



'20'G 790 JCxt,Mt)"-l'GOTO 680 
808 xt-x/2-l'Mt»INT(ii''2) 
810 IF ASKa»)-'242 AND x>4 AND 
t-l,HtKlB THEN x-x-2'GOTO 680 



3'drz=l 

1008 NEKT sb'NEXT xb 

IBIS GOTO 688 

1020 REM calcul du. nombre 

1040 t=l'IF r(Xt.yt)=!0 OR !(Krf- 
l,atK>10 RND xtOl) AND CKxt.st- 
1)018 AND mU>1)> THEN 1150 
CLS «1 'PRINT dl'PRINT Hi 

HorizontaU 



1060 GOSUB 2310' IF UPPER**;** 3*" 

THEN 1110 

1070 IF Kxt-l,»t)O10 AND xtOl T 

HEN 1150 

1380 NHILE Kxt+l,yt><10 AND xt<h 

xt=xt+l't=t+I'WEND'DIM nCt) 

1990 n=0'FOR i=l TO t"n(i3=Kxt-i- 

l,Ht)'n=TiCi3*10"i+r.NEXT i 

1100 GOTO 1160 

1110 IF Kxt,nt-IX>10 HND utOl ' 

HEN 1130 

1120 WHILE Kxt,ut*lX10 RND »t<v ' 

Mt=ut+l't=t+l'HEND'DIM n<t) 

1130 n=0'FOR i=l TO t ' nC i >=r< xt. »t 

-i + l>.n=nCi>*10"i+n'NEXT i 

1140 GOTO 1160 

1150 CLS #1 'PRINT It 1 'PRINT tti," 

curseur doit etre Place au. DEBUT 
du nombre"'GOTO 680 
1160 nan-' 10 

1170 REM —definition 

1130 PEN #1,3 'CLS #1 -PRINT #1,' 

"CHR*(x^2+633" -" INKa-'2 )" 
PEN (tl.l'IF UPPER«Ca*)="V" THEN PR 
INT ttl," wertic*Iement" ELSE PRINT 

#1 , "horizontal erne lit" 
1199 PRINT ttl 

1219 IF t=l THEN FOR i=4 TO S'dfti 
,3>=0NEXT i'dfC10,3)=0'C=l. 
1228 IF t=2 THEN df< 10,3 3-0 
1230 IF n=6 THEN c=10 
1240 FOR i = l TO CRND<-n-10*x-y)*l€ 
83'aldef=RND'NExT i'dr2=0 
1258 FOR DEFN=1 TO 10 
1260 ?ldef=RND IF alde^DFCdefn.S) 
THEN GOTO 1280 
1270 NEXT DEFNGOTO 1258 
1280 ON DEFN GOSUB 1330,1350,1370. 
1400, 1430, 1510, 1370. 1600, 1630, 1670 
[290 DF<defn.3>8'IF dr2=8 THEN 12 
50 







CANON X07 




Y 

15001 DATAO 


Suite de la page 3 


2,4,4,0,4,4,4,4,2,0 


1.7,7,7, 


7,7,7,7 
15002 DATAO 


1,0,0,0,0,3,0,5, 1,0 


0,0,0,5, 


0,0,3,0 
13003 DATAO 


,2,4, 4,0,4,4,0,4, 2,4 


4,4,0,4, 


4,0,4,2 

16000 DAT*? 
4,4,4,4 

16001 DATA1 






,o,o,o,o,o,o,o,o,o f o 


0,0,0,0, 


0,0,0,0 
16002 DATA1 


,0,0,0,0,0,0,0,0,3,0 


O,0,0,0, 


0,5,0,0 
16003 DATA4 


,4,4,4,4,4,0,4,4,4,4 


2,4,4,0, 


4,4,4,4 
17000 DATAC 


,0,0, 0,0, 0,5, 0,0, 0,0 


0,2,0,0, 


0,3,3,0 

17O01 data: 


,4,4,4,4,4,4,4,4,2,0 


0,4,0,0, 


4,4,4,2 








IP ^STfClEp, St TV 
AJBC tv! ' 




17002 DATA1, 0,0, 0,3, 0,0, 0,O, 1,0, 3, 0,0, 4, 

0,0,0,1 

17003 DATA1, 0,0, 4, 4, 4, 4, 4, 0,4, 4, 4, 0,4, 4, 

1,5,0,5,0,0,5,0,0,4,2,4,0, 
(,5,0,5,0,0,5,0,0,0,1,0,0, 
), 5, 0,5, 0,0, 5, O,0, 0,0, 0,0, 



18000 DATA4,0, 
4,4,4,4 

18001 DATA4.0, 
0,0,0,4 
1B002 DATA4.4, 
0,0,4,4 

180O3 DATA4, 4, 4, 4, 4, 4, 4, 0,4, 0,4, 4, 2, 4,0, 

0,4,4,0 

19000 DATA2, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 2, 4, 4,0 

0,0,0,4 

1V001 DATAl.7,7,7,7, 

5,5,O,0 

19002 DATA1, 0,5, 5, 0,0, 0,0, 0,4, 4, 0,2, 4, 4 

4,4,0,0 

19003 DATA4, 0,4,4, 



,7,7,7, 



J, 0,1,0,0,0, 



^,0,4,0,4,4,0,0, 




20001 DATAO, 0,O, 3, 5, 0,0, 0,0,5,3, 0,0, 0,0, 

0,0,0,4 

20002 DATAO, 0,O, 5, O,0, 0,5, 0,0, 3, 0,0,0,0, 

0,O,O,4 



20O03 DATA2, 4, 4, 4, 4 ,4, 4 ,4, 4, 4, 4, 4, 4, 4,0 

0,0,0,4 

21000 DATA2.4, 



(,4,2,4,4,4,4,4,2,4, 



21002 DATA 1,0, 0,0, 0,0,0, 1,0,0,0,0,0, 1,0, 
0,0,0,0 

21003 DATA4,4,4,4,4,4,4,4,4,4,4,4,4,4,4, 
4,4,2,4 

22000 DATA4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4,4, 4,4, 
4,4,4,2 

22001 DATAO, 0,3, 0,0, 0,0, 0,0, 0,3, 3, 0,0,0, 

0,0,0, 1 

22002 DATA2, 4, 4, 4, 4, 0,4, 4, 4, 4, 4, 4, 4, 4, 4, 

0,4,4,4 

22003 DATA1, O.O, 0,4, 0,4, 2, O.O, 0,0, 0,2, 4, 

0,4,0,0 

23000 DATA1, 0,4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 
4,4,4,4 

23001 DATAO, 0,0, 0,0, 3, 0,0, 0,0, 0,0, 0,0,0, 

0,0,0,0 

23002 DATA4, 0,0, 0,5, 5, 0,O, 0,0, 0,0, 0,0, 5, 

5,0,0,0 

23003 DATA4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 0,0, 4, 4, 
4,4,4,2 

24000 0ATA4, 4, 4, 4, 4, 4, 4, 4, 4.4, 4, 4, 4, 4, 4, 

4,2,4,4 ■ 

24001 DATA7, 7, 7, 7, 7, 7, 7,7, 7, 7, 7,7, 7,7, 7, 

imt'wnM, 0,0,4*^0, 4, Q,a,4,tt, 1,0,0,0, 

o, 1,0,0 

24003 DATA2,4,4,4,4,4,4,4,4,4,4,4,4,4,4, 
4,4,4,4 ' 

25000 DATA4, O.O, 0,3, 0,5,0, 0,2, 4,4, 4, 4, 4, 

4,4,4,4 

25001 DATA7, 0,4, 4, 4, 4, 4, 4, 0,0, 7, 7, 7, 7, 7, 

7,7,7,7 

23002 DATAO, 3,0, 5, 0,0, 0,0, 3, 0,0, 0,0, 0,3, 

0,0,0,0 

23003 DATA4, 4, 0,4, 4, 4, 4, 4, 4, 4, 4, 0,0, 4, 4, 

4,2,4,4 

26000 DATAO, 0,0, 0,0,0,0,0, 0,2, 4, 4, 4, 4, 4, 

4,4,4,4 

26001 DATA2,4,4,4,4,4,4,4,4,4,4,7,7,7,7, 

7,7,7,7 

26002 DATA1, 0,0, 0,0, 0,0, 3, O.O, O.O, 0,0,0, 

5,0,0,0 

26003 DATA4, 4, 4, 4, 0,4, 4, 4, 4, 2, 4, 4, 4, 0,4, 

4,4,4,4 

27000 DATA4, 4, 4, 4, 4, 4, 4, 4, 0,2, 0,4, 4, 4, 4, 

4,4,4,4 

27001 DATA4,5, 7, 5,7, 5,7,5,0, 1,0,5,7,5,7, 
3,7,5,4 

, 27002 DATA4, 0,O, 0,O, 0,0, 0,0, 0,0, 0,0, O.O, 

O,0,0,4 
, 27003 DATA4, 4, 4, 4, 4, 4, 4, 4, 0,2, 0,4, 4, 4, 4 
4,4,4,4 
2BOOO DATAO, 0,5, 0,0, 5, 0,0, O.O, 0,O, 0,0, 4 



26002 DATA1, 0,3, 0,0, 0,0, 3, 0,0, 4, 0,0, 5,0, 

0,4,0,2 

2S0O3 DATA2, 0,4, 4, 4, 0,4, 4, 4, 2, 4, 0,4, 4, 4, 

4,4,4,2 

29000 DAT A2, O.O, 0,4, 4, 4, 4, 4, 4, 4; 4, 4, 4, 4, 
4,4,4,4 

29001 DATA4, 0,4, 0,7, 7, 7, 7,3, 5, 7,7, 7, 7, 3, 
7,7,7,7 

29002 DATAO, 0,0, 0,0, 0,0, 0,3, 5,0, 0,0, 3,5, 
0,0,5,0 

29003 DATA4, 4, 4, O.O, 0,4,4, 4, 4, 4, 4, 4, 4, 4, 
4,4,4,2 

30000 DATAO, 5, 0,0, 0,3, 0,0, 0,5 ,0,3, 0,0,0, 
0,0,0,1 

30001 DATA2, 4, 4, 0,4,4, 4, 0,0, 4, 0,4, 4, 0,4, 

4,4,0,2 

30002 DATA1, 0,0, 5, 0,5, O.O, 0,3, 0,5, 3, 0,0, 

0,0,0,0 

30003 DATA2, 4, 4, 0,4, 4, 4, 4, 4, 4, 0,4, 4, 0,0, 

4,4,4,4 

31000 DATA1, 0,0, 0,4, 0,0, 0,1,0,0,0,0,0,1, 
0,4,4,4 

31001 DATA2, 4, 0,7, 4, 4, 2, 4, 4,4, 7, 7, 4, 4,0, 
0,7,7,7 

31002 DATAO, 0,0, 0,3, 0,1,5,0,0,0,3,5,0,2, 
4,4,4,2 

31003 DATA2, 4, 4, 0,4, 4, 4,4, 4, 4,0, 4, 4, 4, 2, 

0,0,0,2 

32000 DATAO.O, 0,0, 0,0, 0,0, 0,0,O,0, 0,0,0, 

0,0,0,2 

32001 DATA2, 4, 4, 4, 2, 0,0, 5, 0,5, O.O, 0,3,0, 

5,0,0,1 

32002 DATA1, 0,5, 0,1, 3, 0,4, 4, 4, 0,4, 0,4. 4, 

4,0,4,1 

32003 DATA1, 0,4, 4, 4, 4, 0,4, 2, 4, 0,4, 0,4, 2, 

4,0,4,0 

33000 DATAO, 0,O, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 

O,0,0,0 

33001 DATAO, 0,0,0,0, 0,O, 0,0, 0,0, 0,0,0,0, 

0,0,0,0 
, 33002 DATAO, 0,0, 0,0, O,0, 0,0, 0,0, 0,0, 0,O, 

0,0,0,0 
, 33003 DATAO, 0,0, 0,O, O.O, 0,0,0,0, 0,0, 0,0, 

0,0,0,0 
, 34000 DATAO, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 

0,0,0,0 

34001 DATAO, 0,0, 0,0,0, 0,0, 0,O, 0,0, 0,0,0, 

0,0,0,0 

34002 DATAO, 0,0, 0,0, 0,0, O.O, 0,0, 0,0, 0,0, 

0,0,0,0 

34003 DATAO, 0,0, 0,0, O, 0,0,0, 0,0, 0,0, 0,0, 
0,0,0,0 

SOOOO IFNH-2THENDI-0:DJ-O:NH-O: RETURN 
5001O NH-WH+l:IFNH=lTHENDZ=DJ:DJ=OELSEDJ 
=DZ:DI-0 a 

30020 RETURN W 








DEFENSEUR 



Arm6 de terrifiantes bombes a neutrons, volez a Vi- 
tesse luminique au secours des colons victimes d'en- 
vahisseurs qu'ils sont vilains beaucoup. 

Samuel HAMELIN 

Mode d'emploi : 

Entrez les codes MACHINE des listings 1, 2, et 3 par CALL -151 et 
sauvegardez-les respectivement par DECOR, MIRAGE-0.OBJ1 , Ml- 
RAGE-0.OBJ0. Puis failes tourner le programme BASIC du listing 4 
sauve sous le nom de MIRAGE. Pour jouer, utilisez le joystick pour 
monter ou descendre, le bouton de tir pour accelerer, la barre d'es- 
pace pour faire demi-tour, la fleche droite pour tirer et la gauche 
pour larguer vos fameuses bombes a neutrons. 



6030- 94 93 92 VI 

6038- 90. 91 90 8F ' 8E 

6040- 8A B9 S3 37 86 

6043- 32 81 30 ?F ?E 

6050- 7A 79 7A 79 7A 

158- 7C 70 7E 7F 80 



k AB AA AB <$00; 
\ .A3 AA AB ($00) 
S AB AA A9 <S02> 
I A3 A2 Al <S08) 
: 90 9£ 90 <43C> 
) 97 94 95 (SOS) 



4350- 
6353- 
6340' 
6368- 
6370- 
6378- 



1*04) 



1A) 



6060- 84 S5 E 



87 E 



6063- SC 3D 3E 3F 8E 
6070- 90 91 92 93 94 
6073- 94 93 94 93 94 
6030- 94 93 94 93 94 
6068- 94 93 94 93 94 
6090- 94 93 94 93 94 
6093- 94 95 96 97 98 
40AO- 9C 9D 9E 9F 9E 



10- A3 A9 AS A9 f 



8D ec 
85 34 S3 ($08! 
70 7C 7B <SF8: 
79 7A 78 <*02; 
81 32 S3 ($001 

<aoo; 



I 8E * 



itDZl 



60E0- B2 Bl B0 

60E8- AA A3 AC 

40FO- B2 B3 B4 

60F8- B2 B3 B2 



B3 B2 
AD AC 

AF B0 
AF AE 
AD AE 
S3 32 



6110- AC AB AA A9 A8 
6118- AC AD AE AD AE 
4120- B0 Bl B2 Bl 60 
4128- AC AB AA AB AC 
6130- AC AB AA AB AA 
6138- AA AB AC AD AE 
B5 B4 



93 92 


93 


($06) 


93 94 


Vd 


:$oo) 


93 94 


VH 


:$oo) 


93 94 


93 


<S0O> 


93 94 


93 (SOO) 


99 9A 


9B 


($00) 
($00) 


A5 A6 




$00 


AB AC 


AD 


;»oo> 


83 32 


m 


;$oo> 


B3 B2 


m 




B3 B2 


Ftl 


:$02) 


AB AA 




:*ia) 


Bl B2 


ua 


:$00) 


AD AC 


ah 


-418) 


AF B0 


Bl 


;$oo> 


Bl B0 


Rl 


;$04) 


Bl B2 


ua 


;$02) 


B7 B6 


us 


(40C> 


AF AE 


Al) 


;$is) 


A9 AA 




;«04) 


AD AE 


AF 


L*00) 


AF AE AD 


;tiE) 


AD AE 


AD ($04) 



i AA ( 



($04! 



4148- 84B5_SA_i 



4140- 5D 6C BB BO BB 
4168- BC BB BA B9 B8 
4170- B4 B3 B2 Bl B0 
4173- AC. AB AA A9 A8 
6180- A4 A3 A2 Al A0 
4188- 9C VB 9A 99 98 
4190- 94 93 92 91 92 
4198- 92 91 92 91 92 
41A0- 92 91 92 91 92 
41A8- 92 91 92 91 92 
61B0- 92 91 92 91 92 
41B8- 92 91 90 BF BE 
61C0- 8A 89 88 87 84 
41C8- 82 8! 30 7F 7E 
4100- 82 63 84 85 84 
6108- BA 8B SC 8D 8E 
61 E0- 92 93 92 93 92 
61E8- 92 93 92 93 92 
61F0- 94 95 96 97 98 
J 98 



6200- 98 99 5 



99 98 
P8 PC 
A3 A4 
A3 A4 
AB AC 
AF AE 
A7 A4 
AB AC 
AD AC 



4288- 
42P0- 
42P8- 
62A0- 



AE AD AC AB AA 
A6 AS A6 A7 A8 
AC AD AE AF B0 
B4 65 B4 B7 B8 
84 65 B4 63 B2 
B2 81 62 Bl 62 
B2 Bl 82 Bl B2 
B2 Bl 82 Bl B0 
C AB AC 
E AD AC 
i A5 A4 
4 A5 A4 

2 A3 A4 
) PF ?E 

3 99 PA 



92 91 90 8F 8E 



4 AB AC 
I Bl B2 
i B7 SB 



AA A? A8 A7 A 



4410 
44 IS 
4420' 



6450- 
6458- 
6440- 
6468- 
6470- 
4478- 



4338- A4 A5 f 



AF GO Bl (900) 
35 B4 B5 ($00) 
-B7 B8 B9 (*0C) 
BD BC BB ($06) 
BC BD 6E ($04) 
BC BB BC ($06) 
B7 B4 B5 ($08) 
AF AE AD ($18) 
A7 A4 A5 ($08) 
PF 9E 9D ($38) 
P7" 94 95 ($08) 
91 92 91 ($04) 
91 92 VI ($00) 
PI P2 91 ($00) 
91 P2 91 ($00) 
PI ?2 91 ($00) 
BD BC 8B ($18) 
85 84 63 (408) 
7F 80 81 ($FC> 
87 38 8? (400) 
8F 90 91 ($00) 
93 92 P3 ($00) 
93 92 P3 ($00) 
99 98 99 (400) 
99 98 99 ($00) 
99 9B 99 ($00) 
9D 9E 9F ($00) 
A3 A4 A3 ($00) 
A5 A4 A7 (400) 
AD AE AF ($00) 
AD AC AB ($04) 
A5 A6 A7 ($0E) 
AD AE AF ($00) 
AB AA A9 ($18) 
A7 AB A9 ($0C) 
AF B0 AF($1E) 
AP A8 A7 ($08) 
A9 AA AB ($02) 
Bl 32 B3($00) 
B? B8 B7 ($0E) 
Bl B2 Bl ($04) 
Bl B2 Bl ($00) 
Bl B2 81 ($00) 
AF AE AD(*1C) 
AD AE AF($00) 
AB AA A9($18) 
A5 A4 A?($GC) 
A3 A2 Al ($08) 
A5 A4 A3 ($04) 
?D 9C 9B<$38) 
9B PC PS <$04) 
95 94 93 ($08) 
95 94 93 ($04) 
8D 8C 8B($18) 
8D 8E 8F($02) 
95 96 97($00) 
90 9E VF($00) 
A5 A6 A7($00) 
AD AE AF($Q0) 
B3 B4 B5<$1E) 
B7 B8 B9(4Q E ) 
85 B4 B3(*0B) 
AD AC AB($18) 
A5 A4 A3<408) 
A7 A8 A9(400) 







En raison de la longueur In- 
habituelle du listing, ce pro- 
gramme pas&era en plu- 
sieurs lots. 



4008- 


3(1 


0b 


mi 


7F 


4C CF 


40 


s.5 .:-jac:> 


6010- 


f4 


W 


AV 


Ih 


38 E9 




A8 ;$24) 


4018- 


HR 


8? 


i 1 ! 


F9 


01 DO 


IV 


9$ -:*A2i 


6020- 


3F 


FS 


UK 


C9 


ae vo 


U4 


C9 (JC3) 


6028- 


FC 


9(i 


00 


as 


ES BD 




15 ($72) 


6030- 


m 


F4 


?n 


:w 


1C AE 


l)A 


60 (*7F) 


6038- 


4C 


CF 


ao 


BO 


DB 15 




4A (490) 


6040- 


4A 


3P 


F9 


01 


A3 B9 


FF 


80 (»E3) 


4048- 


as 


00 


B9 


FC 


Bl IS 


43 


E9 (»D5) 


6050- 


8b 


01 


BU 


A9 


13 B5 


FO 


80 ($4D) 


4058- 


KH 


Hi 


«h 


Ft 


46 Fl 


64 




6060- 




Fi 


64 


F0 


44 Fl 


44 




6068- 


44 


Fl 




FO 


A5 F0 


Ifl 


6V<$05) 


6070- 


^4 




BC 


DF 


7D A9 


[III 


9! ($AA) 


4078- 


nil 


en 


VI 


llll 


AE 04 


All 




6080- 


A? 


1! 


3fl 


C9 


B8 A3 


RD 


B3 (473) 


608B- 


15 


FV 


01 


F(l 


03 4C 


CF 




6090- 


HO 


ou 


19 


AA 


IS 69 


07 


80 < J22) 


4098- 


L9 


40 


VH 


38 


E9 08 


AU 


89 (*F9) 


40A0- 


HF 


fir 


HI) 


KV 


40 18 


rtV 




60A8- 


RD 


T4 


4(1 


Rf' 


FC 30 


Rb 




40B0- 


m 


1% 


ft? 


in 


45 E9 


PS 




6068- 


M 


FF 


CO 


2Q 


80 04 




00($AA) 


60CO- 


VI 


UO 


CB 


uu 


FF DO 


F3 




60C8- 


F0 


FF 


Oil 


Di- 


AE D6 


All 




60D0- 


F0 


ua 


4fi 


li? 


40 60 


71' 




60D8- 


0A A9 


(IP 


313 


ED 94 


4A 




60E0- 


F0 


■■: ■- 


8(1 


UA 


A9 00 


E9 


00 (*73) 


















60F0- 


BD 


C7 


15 


9D 


B3 15 


BD 


Dl ($38) 


60F8- 


1f> 


VI) 


l)H 


ia 


B0 EF 


1^ 




6100- 


FV 


15 


30 


OS 


DO 06 


4C 




6108- 


ii 


FE 


th 


15 


CV 05 


Oil 




6110- 


AV 


111 


Uli 


V4 


75 AD 


:« 




4116- 




49 


rn 


9D 


60 15 


AV 


00 <*2D) 


4120- 


49 


Ul 


90 


C7 


15 AD 


3C 




6128- 


ia 


49 


ou 


9D 


Dl 15 


CP 


BC(453) 


41 30- 

4138- 


BU 
4F 


14 


A0 


at 


6A CV 


CO 


DO (484) 














4140- 


91) 


03 


lo 


4f. 


88 61 


ao 




4148- 


UV 


20 




F0 


04 68 


Ml 




4150- 


4C 


6B 


61 


Al) 


3A 6A 


IS 




6158- 


ll 3 


yy 


34 


16 


A9 8B 


vv 


39 ($0A) 


6160- 


M 


AV 


n-'J 1 


vv 


20 14 


AV 




6168- 


P9 


3F 




FR 


A9 05 


18 




6170- 


3b 


[IV 


Rl) 


3F 


OP AD 


3F 


0V(4i4j 


617B- 


4V 


00 


HI) 


SW 


0? D8 


AV 




61B0- 


y[) 


Dl 


lb 


AV 


01 VD 


FF 






4C 


yt 


62 


61) 


BD 15 


IH 




4190- 


FU 


yo 


UO 


lb 


BD C7 


\H 




61 98- 


F2 


2V 


U3 


PD 


C7 15 


61) 




61A0- 


lb 


t;y 


114 


HI 


03 4C 


vl- 




61A8- 


AV 


01 




P6 


75 BD 


01 




6160- 


L i y 




VO 




BD 03 


14 




6168- 


3C 


BU 


b\i 




01 90 


FF 




61C0- 


A0 


Ub 


BV 


20 


14 FO 






41C8- 


DU 


F8 


4U 


KO 


41 BD 


BD 


15 (»EO) 



4468' 
4470 
4478 



4490' 

4493- 
44A0 
44AB* 



64C0- 
44C8- 
64D0- 
64D8- 
64E0- 



45Q0- 
6508- 
6510- 
6513- 
4520- 



i E3 AO 

OC 30 

i 35 E4 



BP C3 
EB OC 
E9 08 
70 AC 
4A 64 
34 37 
14 8C 
05 00 
B9 D? 



32 A9 03 (4A7i 
VA 45 B9 <$;£; 
20 4C 93 ($9!) 
OC 35 E5(S04i 
8E BO OB i 



80 53 6A AD 
40 95 6A 30 
38 EO 95 6A 
93 4A 18 40 
6B AV 01 BD 
6A 16 6D P5 



00 91 00 C8 


$56) 


00 AC BB 43 


$97) 


EV B8 AA B9 


$A8) 


DO OE 8A 38 


4E4) 


78 OB 20 F4 


$54) 


88 FO 03 4C 


$38) 


A9 07 35 E3 




69 B9 3C OB 


$91) 


4C 4C 49 85 


%29"> 


85 E5 C9 FC 


44 Dl 


BO OB B9 72 


$83) 


38 1C AC 53 


$93) 


89 72 OB 4A 


$8A) 


01 AA BD E3 


$24) 


FC 31 18 45 


*6B) 


4£ OB 8S FO 


*E4) 


Fl 44 Fl 66 


$40) 


FO 44 Fl 66-. 


$00) 


FD A5 FO IB 


$9C) 


DF 7D AV 00 


$W) 


00 AC 53 6V 


*5E) 


EV 88 AA 8V 


$84) 


DO OE 8A 38 


$DB) 


72 OB 20 61 


$CA) 


38 FO 03 4C 


$D0) 


A2 00 AO 00 


*C3) 


18 20 91 69 ( 


$B8) 


Fl AO 01 A2( 




A2 22 20 8U 


*EP) 


81 49 A2 BB 


$43) 


CO 18 DO E7i 


$f-H 


35 1)0 B9 FC 


$7A) 


B5 01 98 48 


(41) 


A7 71 09 80 ( 


*C6) 


00 91 00 68' 


IF5) 


FO 29 A9 7F' 


$8B) 


14 40 80 13 


$99) 


8D 93 41 8D( 


$48) 


50 80 14 5D' 


$D2) 


40 3D 15 44 


$AA) 


95 41 60 AV 


$55) 


80 14 20 80 ( 


*F3) 


24 8D 93 2! 


465) 


13 30 3D 14 ( 


S02) 


15 20 80 15 


$B3) 




$08 > 


45 EV 85 01 


$DD) 


A8 ?1 00 C8 


CA DO F4 40 


$40) 


54 -CO 2C 57 


470) 


80 25 4A A9 


$A2) 


60 20 25 00 


$A5) 


3A 4A A9 5F 


$B6) 


01 8D 3D 6A 


$AV) 


20 20 29 A9 


4CE) 


BD 53 4A A9 


$A8) 


AV 42 3D 55 


$A4) 


49 IE 00 20 


*1D) 


9D 62 6A CA 


$57) 


70 3A 4V 20 


$4H) 


2C 20 20 20 


$5F) 


20 20 25 20 


$33) 


6A 80 93 6A 


4AB> 


97 4A AV 14 


4BC) 


01 8D 95 6A 


$AF> 


20 22 2E 20 


$47) 


OS CD Bl OP 


$B6) 


8D B2 OP AO 


$A9) 


OA 18 6V 40 


$3C) 


2E B2 09 38 


^$81) 


OP 60 AE 47 


*A3) 


6D EC 6A AP 


$95) 


A9 02 80 38 


$10) 


3D 09 4A.4A 


$42) 


4A BD 30 0? 


42E) 


4A CA 10 EB 


480) 


20 AS DO OC 


400) 


07 FO 05 AD 


$48 > 


AV 01 8D EP 


$87) 


OA 18 49 3A 


$B3) 


00 69 91 BD 


$14) 


BV 04 82 18 


$r.5) 


6B BP ED 80 


$8E) 


18 6D EC 6A 


$1)5)' 


FF FF 8D FF 


402) 


EE 38 6B 40 


45A) 


FO 02 10 09 


431) 


6A 80 94 4A 


$AE) 


C9 AO DO 10 




FF 80 91 4A 


$DC> 


FE 8D 95 4A 




17 AD 3C 09 


$RP 


CO CV 88 DO 


$1E) 


AV 01 80 V7 


$45) 


AD 94 4A FO 


$30) 


AD 93 6A FO 


49D) 


A9 05 8D 96 


$4F) 


30 23 AV 00 


4DC) 


93 6A FO 31 


$21) 


OA AD 93 4A 


4DC) 


4C Dl 68 AD 


$71) 


95 6A 4C Dl ' 


$EE) 


53 4A AD 93 i 


$49) 


4A C9 08 FO ( 


$Di) 



ASUIVRE... 



FORT APOCAL YPSE 



$ i*usVTe$> 



Dans un decor hallucinant de grottes et souterrains 
pieges, vivez I'enfer du deminage. 

Laurent GOFFIN 

Mode d'emploi : 

Crrjez une ligne 1 REM de 320 caracteres et tapez le programme 
BASIC. Entrez ensuite par RUN 20, les codes MACHINE du listing 
2. Pour jouer, faites RUN 1000. II esl conseille de debrancher I'im- 
primante avant I'execution du jeu. Les regies sont incluses. 



(Pi?ili Qu'te OUT 
Ffi WWt Of STfiiAS- 
CgSTEtfCoPE Plus 



1 R£M ^"aPPEEK " PRINT 'WW 
.K ■ NEXT " A GOSUB i?^?, PETUR 
COS GOSUB_?H5NDTRN .^.^Sl^ 
' iVj'XMr - 



RETURN CI RETURN 



'mt 



NDUteNSsHRNDQ.l^RNg RETURN "4 "O 
RETURN ^"iBRNp RETURN "4PJBRN 
O Y COPY iJMBRND".. ,?<,?<STR* F« 



T E£RNDSCSN , SGN 
NOQ 70 70 GOSUB 
RN F 1 LI5T 7770. ' 
7 RETURN 



4" COPY COPY ' 

B BINKEYS? RETURN RL. - - .. 

RN TO 4*^5 RETURN L.OQD 4™ TO_C 




88) 



2~REM ROLE DE LR ROUTINE LM: 

5CRU1 RTION CLRUIER.DEPLRCEHENTS. 

TIR.RRY0N5 LflZER.MUR. ^ = 

4 REM *RFFICMRGE*DE3*C0DE3» 

. . ■,■, ■■ ■ ■ 

5 FOR N=16S14 TO 16833 STEP 6 

6 LPRINT Ni " "; 

7 FOR M=8 TO 7 

:: ;_ir-.T U ■■= P S K K <» ■*;■■) 
9 LET X = INT (U/16) 

10 LET Y=U-iX*16) 

11 LPRINT CHRS (X+28> ; CHRS lY + 

"l2 NEXT M 
13 LPRINT 

23 REM ***£NTREE*DES*CQDES*** 
*MRCHINE5*EN*HEXR* 

21 FOR N=16514 TO 16833 STEP 8 

22 PRINT N; " ; "; 

23 FOR M = l TO 8 

I! IF P LEN U UK>2 THEN GOTO S4 
25 LET X=CODE U4 i2> -£8 
27 LET Y=iCODE U((1)-S8J*16 
23 IF X+Y<0 OR X+Y>255 THEN GO 
TO 24 

30 PRINT US, " "; 

31 NEXT M 

32 PRINT 

33 NEXT N 
43 STOP 

500 REM **TRSLERUX**2**R*«5**** 



517 POKE 16418,0 

525 LET MN = MINE::-, vj.;- 

526 LET TRB=600 
530 GOTO 2115 

602 LET H6=STR$ iJIE 

-" :00S THi-;..".-.i' 



V.WV^W.V.V. 



■^■MMSS"'™™™'^ 



74-k? LET M!-t = HINE-=. + 4S 

V4.5 POKE ie4:lS,0 

7'5Ci LET T'5;-=53e 

754 GOTO 211S 

S02 LET R$=STR$ 'JIE + . 
■:■■ ■ ■!■'■■, ■■■■.■■..<:■■■■ : ■ 

8^ LET R^J 




_ J WML, 



620 LET TPB=70« 

'sT,e C-OTO 2115 

702 I ET HJ=STR$ UIE + 



840 LET MN=MINES+S4 

842 POKE 16415 ,0 

350 LET TRE=200G 

354 GOTO 2115 

1000 MEM *****CfiMEL*****.:.OFT* 




rf hm* =B * LMHLL bU 

1115 PRINT RT 18,i3i 

1120 FOP. N = l TO 123 

1130 PRINT BS IN) ; 

1140 NEXT N 

1150 LET B$-"COPYRIGHT: " 

1160 PRINT RT 4,18; "-" 

1170 FOR N=l TO 10 

1160 PRINT RT 4, 17+N; B$ (NJ i "-" 

1190 NEXT N 

1203 PRINT RT 4,28, " " 

1213 LET B$="GOFFIH LAURENT" 

1220 PRINT RT 7,16; "-" 

1230 FOR N = l TO 14 

1243 PRINT RT ?., 15 + N.. 6S ir-j; : ■' -■■ 

1250 NEXT N 

1260 PRINT RT 7,30; " " 

1320 LET Et- ,, 341534113315331I351 

532 11321432 L232I33715 3 6 1 S 3 5 1 5 ;■ 5 1 

43513361337133712371136113511" 

.s.33!? FOP H = TO 79 STEP 4 

1343 PLOT URL (BJiN+l TO N+K) 1 . U 

Hl_ iBS (N+3 TO Nt-41 J 

1350 NEXT N 

1360 FOP 1! = ::? TO 3 3 

1.370 PLOT N, 17 

13S0 NEXT N 

1350 FOR N-17 TO 9 STEP. -1 

14O0 PLOT 30, N 

1410 NEXT N 

1420 FOP N=39 TO 30 STEP -1 

1430 PLOT H,9 

;.«.i.O !!EL..T :■: 

1450 FOR N=9 TO 17 

1463 PLOT 33, N 

1470 NEXT N 

14S0 FOR r|r=?.0 TO ;.!. 

14--Ii3 PLOT N,17 

■■■07. i !!-'-■ T -■! 

1513 PRHD COS COS '70S COS 3 

1520 PRINT PiT 14 .0: "f-fiEs-CF: U'lE" 

1525 PRINT ■' TOUCHE" 

1530 IF INKEV* ■;>"" THEN GOTu 156 

1540 PRINT RT 14 
1S45 PRINT " P 
1550 GOTO 1523 . 
1555 REM **PRESENTP,TION**TRB* 



A SUIVRE... 



AMSTRAD 
Y 



Suite de la page 4 



l3Ci8 IF c<=3-dif THEN c=c+df< defn, 
2>:G0T0 1256 

- M :.i 1 =1 

1320 RESTORE S5B = GOTO 650 

■^:.X;;:l 
T,J.g> THEM PRINT It 1, "(-arris Parfait 

."idr2=l 
1340 RETURN 

1359 If ROUMDi; rr'-c l-'3 >, 5 >=PIJUND'^T'C 
l,3.i,e> THEN PRINT #l,"cube Parfai 
t"-dr-2=i 

1360 RETURN 

1370 IF drl=0 THEN li03UB 17S9 
1380 IF *■:; 1 J-'-.-, "iti-- f-RIHT ttl."fio 
\.itir ■* frerdier- . "'dr2=l 
1390 RETURN 

1400 IF drl=0 THEN GOSUB 17S6 
1410 IF derax>T, THEN PRINT ttl,"s 
on Plus grand diwiseur premier ... 

"iFRINT ttl," ... esfdecai)"."' 

dr2=l-!df(S,3>*0 

1420 RETURN 

1430 IF drl=3 THEN GOSUB 178U 

1448 IF d>c< 1 )=n THEN 1500 

1430 sl=0.FQR 1=1 TO i itl i sl=sl+de 

cCn^NEXT i 

1469 PRINT ttl, "la somine des nombre 
s corftposantg. s* ,.." 

1470 PRINT #1," .. decomposition e 
yi f*ctsurs Premiers" 
1480 PRINT #1," .tautres que 1 & 1 
e -tiombr-e lui-memeJ" 
1490 PRINT ttl. " ... est "si". 
":dr2=l 
1500 RETURN 

1510 IF drl=0 THEH GOSUB 17B0 
1520 IF dec(lJ=n THEN 1560 

1530 divl=dec(INT(al*ii )+l>idiv2=d 

ec(INTCal*ii>+l> 

1540 IF divl=div2 THEN div=divl EL 

3E div=divl*div2 

1550 PRINT ttl, "est multiple de"div 

"."idr2=l^df<4.3)=0 

1550 RETURN 

1570 soifF=0iFOR i = l TO t ■ som=sord+ri( 

iJ'NEXT i 

,580 PRINT ttl, "la somme des chiffr 

es comPosanta ..." 



1590 PRINT ttl." ... ce noi'hre 

est"sorV'."idr2=l: RETURN 

1600 Prod=l : FOR i=l TO tProd=Prod 

*n(l>.NEHT i 

1610 PRINT ttl.'Me Produit des chif 

fres comPosafits ..." 

1620 PRINT ttl," ... ce nombre 

esf'Prod". " ;dr 2=1 i RETURN 

1633 multl=--:;*aW'w-U5>i-2>!mult2=Tl 

*CINTCt;ar2)*13>+35 

1640 IF mtiltl=mult2 THEN mult2=mu.l 

t2+n 

1650 PRINT ttl, "a Pour multiP les"mu 

Itr'&"mult2"."'dr2=l 

1660 RETURN 

1679 FOR i=l TO t-s=0|p=liFOR ib»l 
TO t 

1680 IF ib=i THEN 1710 
1690 s=s+Tii:ib>ip=P*n<ib) 
1700 IF n<ib)=nCii THEN unl $=u.fl*C i 
> = u.«2*=an«<ib>iPRIHT ttl,"le chiffr 
e det "unl«" e9al ..."■PRINT ttl." 
.. le chiffre des "u.n2*idr-2=l : RETU 
RM 

1710 NEXT ibii.m*-(J.Ti*<i> 
1720 IF s=n<i> THEN PRINT *l."le c 
hiffre des "un«" e9«»l ..."PRINT tt 
1," ... la somme des autres chiff 
res ."idr2=l " 

1730 IF P=n<i> THEN PRINT ttl,"le c 
hiffre des "un*" e9«l . .."jPRIHT tt 
1," ... le Produit des autres chi 
ffres .•■..•"dr2=l 
1740 NEXT i | RETURN 

1750 REM cursewr 

1760 PLOT xS.MQ.coliDRflU x9+28.y9, 
col 'ORAM x9t20.y9-20.col 
1770 DRFtW x9,a9-20, col DRAW «9-y9, 
col i RETURN 

1780 REM decomposition 

1790 a=niDIN dec<20)ii = l 

1900 IF «/2=IHKa--2 .. ■•■*>! -^-r-: 

2ia=a-'2 ii = iiH iGOTO 1800 

1310 IF a/-3=INTts'3> THEN decC i i J= 

3 s=.=/:3iii = ii-l GOTO ISIS 

1320 Hnl=(a~0.5>+2 

1330 i'l'UHILE 6*i<=lim 

1840 b=a/C6*i-l) IF b=INTCb) THEH 



■920 :<:0=;-,--2-lis0=IMT<iJ/. 



IF dr4=6 THEH 2>im 

PRINT CHRS'-?' ■:{--?■ ^-^0',-: --.b- 

■ r 0R ■ J b=l TO v 

IF Kxb^bK-iO THEM 159B 

IF j(:<b,^X>lS THE! I i-W 

:- iifi-xb )"2+( ybb-ab >"2 
IF nd<d THEN d = v-:f ■■ .^0=:».b ■*» 
.Ni.;sF ■.Si^NEKT xb'dr4=0 
d=< xbb-!<0 y~2H abb-siO )"2 
FOR t=l TO 3iocc=e 
<''■■: .;h" X bb-l TO Kbb+l'FOR i 

TO a" 



■END 

;7::v Ki-: ■ -■ ;■■■- ■.:■>■.*.*'. ■;■., 

.-:--'JS Hf-S-i r-.?:=:.;:-,t.= r.i. 

ient que les reyles du. Jt 

s ii'etes p?s.obl i-di? de t?.f 

s Pdaver von; covit^dtsr •. 
S i«i-i?^iis '.>!$> .dins ■=£■■■ 

r .B 2 p t igs ij, SSiJ- 
£,;:'« r.;*=--d:?..-,s -.r.i, ir-i 1 !■: 

une bebette ."iGOSUB 21: 
2230 FOR tt=l TO lti-FOR 

HE:;t ii GOSUE: IS-MC;:': 
2290 mS- 



2030 IF jCxb.s 
1 OR s»b>v OR a 



if*ato-».0j*2>* 



THE 



2040 IF Cxb-xi 

N 2060 

2050 IF RHD>0.3 THEN 2100 

2S60 IF RND>0.95 THEN 2100 

2070 NEXT Mb i NEXT xb 

2989 IF occ=S THEN LOCHTE £*;..bL*:;, 

2*»bb+l=PEN 3ipRINT CHR*(22':': 

2160 
2090 NEXT t i RETURN 

2100 LOCATE ,>.!.■ ,:■■,. ? J; ,-..ivM R"H .> 
PRINT CHR«';32) 
2110 «;bb=iibiybb=ab 
2120 LOCATE 2*>:bb*2,2*jbb+l PEN 3 = 
PRINT CHRK224) 

2130 IF J(>;bb.!(bb)=10 THEH d=0 i drz 
=aiKKbb.»bb)=INTi;RNCi*9Hl 
2140 j(sbb.ybbj=-l 
2150 RETURN 
2160 CLS ttliPEN 1 PRINT ttl PRINT tt 



I ! ' 



. TO 24 : RE 
dureeiHEX 



■■:: S*!-.-! ' 



J i = i + l^EHi;. IF ^:.il THLN , 

;.iELiE ii = n-l 

j drl=l 'PEIURH 

i REM bebette 

') col=£iG0SU8 1760 

3 IF drz=l THEN 1938 

? d='>;tiL:.--.-;--£+l>' , £+'-.^bb-]MT. 

■ IF d>6 THEN .;!--■;!■ GQ-i C .:i.'Ji : ! 



T 1 

21S5 DATA 284,20,301-20,319.20-338 
.20-213-50,3,1.333.20-0-1-213,50-3 

38-20-0-1. 213, 56. 8- 3. ii.;,::* : :■<« 
. :;'<? ■;■«. 169,25,213.20,130,20.169.2 

5-225,20,190,20,0.1-213-40 

2170 PRINT ttl, "vous ave; ma.rque"! 

.■, .-!■■;■ ■ , . ■. . i ■■ :, 

■, ..,■( t-r + l.-'L-n+l -'dif > >>"Poivits" 
218B mS=" ... -'iJd^: vmj s 

GOSUB 2190^GOSUB 2220 IF UPPER* C ?S 
>="0" THEN PUN ELSE END 

2190 REM mess-a'ae*-'-— 

2200 PEN ttl.l'FOP x-1 TO LL:^.i.,s. r 
RINT ttl,MIDSOnS,x,l>, =NEKT >: PRINT 

ttl: RETURN 

2210 REM entre 

e a la volee 

2220 aS=I:-;i--:.T IF ; ! S-" 

ZiiC ELSE RETURN 

223P1 INPUT -ft: GOSUB 1730-FOfi: 1=0 TO 

?(j|pPIt-iT ds^'i :■; NEXT i . EftflSE cfec 



2540 PRINT »l J CHRKS41j.i isa-^Si 
2550 FOR i=l TO 50 i col =2 i GOSUB 

■ ■■■- ■:.■>'■■ .:■. '■:-. ■■:%■■ Xr-X* :: c --K.- ■■ ; 
?X,>'(.i i-kiiU ttl- 11 S":LOCHTE 4,S = F 

er . von EN 0i PRINT CHR*f56> 
f lire le 2579 GOSUB 2850. CLS #1 

■ -:-. w. tap £580 m*="si • Pou.r ver 
> ^!>s V'GOSUe 2190 

ie trouve £^g ,,*," .j devient r.oir . " ■ GOSUE 
\ 2190 

1 = 1 TO 50 2600 FOR t=l TO 300 = NE^.T t'LuCFiTE 
■X 4-3.REN 1 = PRINT CHRS<5lJ 

e capture 2610 in$="ainsi 3 est juste et 8 es 

G0SU6 2190 1 PRINT ttl ' t faux" : GOSUS 2190 

2300 rn*="en la coinc*iit er.tre Plus £620 \»%="<, vous awez comnis une er 
ieurs chiffres" GOSUB 2190 r-vw qui" GOSUB 2 1 3fJ 

( L3 ttl 2630 n»="abaissera votre score en 

2320 rn*=" ces nor.ibres -/ous seror-t. fin de Partie )" ■■ GOSUB 2190 
deflnis ."iGOSUB 2190 .'■■■■! .■«■■.■'. . ' ; ' '. : ..::- 

J3::^ ..,'£-".=■■:. fU.cant le curseur " ; G0 2650 mS=" le curseur *t in b=b,= i"t.B- 
. : . vie Peuvent" 'GOSUB K156 

2340 x9=45-5)9=371:F0R i = l TO 66 : co £fcy ^:. :■,! ■ i ■■■ ■-;,;> -i 

1=2iG0SUB 176e = col=Q = G0SUB 1760NE og." : GOSUB 2198 

XTi 2678 M*="un chiffre noir"iGOSUe 21 

2350 m*=" t9,-,T.ce ;u'>, touches "iGO 30 

SUB 2190 2690 PRINT ttl 'r»S=" ATTENTION ..." 

■■■: ■■■» ..liCATE 23-13'FOR i=0 TO S^PRI ^GOSUB 2190 

10 + n iNEXT iPRIHT "> 2690 !»*«".. si la bebette chevauch 

e le" i GOSUB 2190 
2370 m*=" au debut du nombre 2700 M* "a ■■.' --■ ■.<-:■•. 

cherche - et en aPPuyant sur D"G ediatement iGOSUB 2190 
OSUB 2190 2710 GOSUB 2650iCLS ttl 

BSUB 2850iCLS ttl 2720 m«="la bebette etant attiree 

2390 m«="ayant trouve le nombre de Par les O'^GOSUB 2190 
fini -"iGOSUB 2190 2730 m«= ,, <tu'el le trftfisforme en d a 

2409 m*="vous Pouyez essaaer "'COS utres chif fres" GOSUB 2190 

Ue 2190 2740 m**"& Par le curseur a fatble 

2410 m*=" ses differents chif distance" ' GOSUB 2190 
fres"'GOSUB 2196 2750 mt="le m&illeur moyen de la c 
; ■■;;:•« :'S' ■:, r. jCPant !a touche cor aPturer eat"iGOSUB 2190 
resPondante ."GOSUB 2190 2760 i**="de confectionner un Pie9e 
£■530 (',*=■■ vous Pourrez ensuite aPP ..."'GOSUB 2190 

nyer S"i* \> , ■' ■ GOSUR .?!W 2770 GOSUB 2850 ' CLS ttl 

7K:i v,'i. = -.sfir, ,je verifier la valid 2780 r S= ir -avoir q 

ite "'GOSUB 2198 u'il suff it" 'GOSUB 2190 

2450 mS=" du. nofdbre cherch 2-' : W ra* = ' : d« taper R Pour ?bandonne 

e ."'GOSUB 2190 r ,"■ GOSUB 2190 

.74;;t- ■■:■?. :.v':- ■: ~; 2800 m*= ,, f)4 t^F'er sur <.E3PfHCE> Pou 

2473 n,S=" exsmFU '"GOSUB 2190 r s*T;i^:r ■' GiJiUH- 7i: : '0 
:--.',ss cia=." = i ■.,.:-.; d~dMs=z des def i 2810 r<vS="un chiffre bleu , " =GOoUfc 
nitions" 'GOSUB 2190 2198 

2490 n*="q'tii p-1 verticalement 2820 mS="q 'Jv. nombre fie F-eut v.ofir.i': 

■ ifiOSUB 2190 ncer Par 9 ..."- GOSUB 2199 

2500 r.i*="est is iicnb!- ■:- 36 . faites 2830 in*' 1 ' .. ma is U Plus simple -: 
votre" i GOSUB 2190 ■-. ■■.:' i-i^n, . "V^uC ■ 

2510 rn*="Pr.:if.-i£.iti-,Ti en t ; f ■ ■?. f. t su" ;;:-7-ri .:;0.v.-.;« .'':7 : ' •li.E-ii'- -=■■■': '-• 

.; f ?F. : :.jv.vr.,er.t" '7i.':=->.!& .=:!9n 150 

2520 PRINT ttl," 3 " ; ' LOi :flTE" 2350 FEN i LOCATE 1,25-* PRINT 

4, 3 'PEN 0' PRINT CHR*(51J u»«Z sur u'ne toucl 

2530 FOR i = l TO 50'col=0GOSIJFJ 176 " „' . 

0'col=2^G0SUB 1760'HEXT i 2860 PEN 1 ■ GOSUB 22^0 ' RETURN 



aPP 



TUCK IN RACE 



VIC 20 



COMMENT 0'T-»d 



Ca va joysticker d'enfer, voici une quete de pastilles 
mouvementee100% langage machine. 

Vincent COGET 

Mode d'emploi : 

Necessite le joystick et une extension 16 Ko. Des monstres vous 
poursuivent et leur contact morte! est a eviter, cependant en ingurgi- 
tanl une des pastilles se trouvant aux coins du labyrinthe, les roles 
sont inverses. Attention, I'effet de ces pastilles est plutot court. Una 
partie sans issue du labyrinthe, contient des pastilles de 10 points. 
Vous devez pour ouvrlr ce passage, prendre la clef qui apparalt a 
certains moments et qui vous laisse juste le temps de traverser le 



parcours. Au debut du jeu, vous disposez d'une reserve d'eau de \ 
120 unites qui s'epuise au fur et a mesure que vous mangez des 
pastilles. Celle-ci a 0, vous ne pouvez plus rien consommer a I'ex- 
ception dune bouteille de 100 unites d'eau. Aux coins superieurs 
droit et gauche, se trouvent des portes "invars"; lorsque vous en 
ouvrez une, vous en fermez une autre par le bouton de tlr du joys- 
tick ou la barre d'espacement. Voici les consignes de sauvegarde : 
Tapez et sauvegardez a la suite les 8 programmes nommes "partie" 
en verifiant soigneusement les DATA. Faites POKE 44,70 : POKE 
70 * 256,0 : NEW. Chargez par SHIFT HUN et patientez environ 30 
minutes que les 6 parties se chargent et implantent en memoire le 
langage MACHINE. Faites tourner par SYS 4656. 
Tapez et sauvegardez le premier programme de "presentation" et 
sauvegardez a sa suite le programme en langage MACHINE par 
POKE 44,18 : POKE 46,70 puis SAVE TUCK IN RACE". 




En raiaon de la longueur in- 
habituelle du listing, ce pro- 
gramme passera en plu- 
siaurs tois. 



3 REM-PRESEUTRTICiN— 



t REM— 



5 F'JKE36379.3 

5 POKE37150.2 

,"' F7>kE783, !94 

8 P0KE803,n4 

Iff PF;IHT"^B".:CHR*<e) 

28 PRIHT"M!ra w 

26 priht"s»»i iinnr wa 

23 PRINT" 3MWW m II II ■■■! t 

38 PRINT" *i»i m H h IMI 

PS.1NT"3M»I III II II l»l ! 
34 PRIHT"I 
36 PRINT"! 
38 PRINT"IP»H»Mld lid "la " 
46 PRINT"! 
42 PR INT "J 
44 PRINT"IMIS H II II II IMI " 
46 PRINT"IMIS) W»S II »ll ! 

48 print "wws murm it n iwi ■■ 

50 PRINT"! 

99 : 

188 !IJKE0,7S 

103 : 

104 P0KE631.76 

105 POKE632.207 

106 P0KE633. 13 
187 P0KE634.83 

168 P0KE635,39 

169 P0KE636,83 

110 P0KE637 -43 

111 P0KE633-13 

112 ! 
11 3 !'>>-El98.8 



115 PRINT"! 



^f-REM^^™----- 

!'■." ; : ?n- >Pi--£ ■?'.■:.; if >■<:■: i :.«■■■ 

13 REtf 

18 PRINTPRRTIE 1" 

■.■■• ■■■J.'.7.--J.f : ,^-: s0 *■:>:;■::■■■ 

20 REHBOC* 

ft COSUB200 

40 P0KEZ.0C 

50 NEXT 

60 fkiiiT'OK "Z 

70 P0KE631 .131 P0KE198.1 END 

206 B=0 

201 F0RI = lTO2H=HSC(MITJ*t0C*. 
1,1)0-48 

202 B=H*16+fl-KH>9>*7:NEXT: 
0C=D : RETURN 

560 DRTRiJy '%'■■•:■■■! 7.7; ■"•.:>, 00,00,60 

501 DRTH00, 60, 12. 01 ,00,81 , 49, B2 

502 DRTFI31 . 04, C3, 28. 4E, 24,29,00 

503 DRTR32, 12,02,00,97,31,36,34 

504 DRTR39, 35, flfl. 49, 2C, C6,28,Cfi 

505 DATR28, 4E, 24. 2C, 12,05,81,04 

506 DHTHI _ii li E c 

507 ERTA28.ie.l3,R9,0F,8B 0i : ■ ■.:*< 

508 DRTflR9,88,8B,0F,90,R9,FF,8D 

509 DP,TH05.90,20,10,13,20,E0,26 

510 DRTRH9,93,20,D2,FF,20,H0,41 

511 DflTR20,08,41,20,F0,29,20,A0 

512 BATR2A, 20,00,42, 20, E0,26, 20 

513 DfiTR13.2fc.4r 4r<. 12, 4C4D, 12 
':■■■:■■• ■ ■ . ■ ■ ■■■... 

515 DATfl03,3B,Bh 

516 DRTflejUSD, 00-02,20,96: 36,60 

517 DRTH00, 00, 00,09. 00.00. 00, 00 

518 DRTR00. 00,90, 00.00. 00. 00, 00 
512 HHTH00.00,00,00,00,00.00.00 

520 BRTRR9,80,85,08,R5,00,R6,01 

521 DRTRE-7; ■-■■■ ■:,.- >*,* :.8E,0C,90 

522 DHTHR2, 10,R0,FF.88,B0,FD,CA 

523 DATRD0,FS,4C,R6.12,R5,00,18 

■■.;■'. ■ 

525 DRTR60, 00, 00, 00, 00.00, 06,00 

526 DRTR00,00, 00,60, 00, 00, 00,60 

527 D6TR00,00,00, 00,60,00, 00,00 

528 DflTfl00»00i.B&,0e 00^00.00^06 

529 DRTR00.00.00, 90, 00.00,00. 00 

530 DRTR00, 00, 00, 08,00,00,00,00 

531 D6TR00,00,00,00,06,00,00,00 

532 DRTR12,42,4F 

533 DRTR20, 92,31-30, 30, 00, 00, 00 

534 DRTRR2,5R,H9,00,9B,9F,03,CA 

535 DRTRD0,FR.60,00. 00,00.00. 00 

536 DRTR9E,12,42.4F,4E,55.53.20 

537 DATR53.54,41,47.45.92,08,00 



539 DRTR00, 

540 ERTRF0. 

541 DfiTHRB, 

542 DRTRC0, 

543 ERTH8B 

544 BfiTH8E. 

545 DRTR02, 

546 DRTRCE 

547 DRTRB9, 

548 DRTA20, 

549 DRTR2D, 
556 DRTR4C, 

551 ERTRF0. 

552 DRTR10, 



00, 00,00,00, RD,CE,02 
28,CE,CB,02,F0,01,60 
B5;iE,C9,20,D0,15,RD 
1E,C9,20,B0,0E,R9,2B 
B5,1E,8D,C0,1E,A9,0F 
D4,02,60,A9,06,8D,CB 
60, RD,D4, 02,00.01. 66 
D4 , Ud , F0, 01 , 68 . R0 . 0D 
14,19,RR,BB,00,1E,C9 
F0,1C,C9,12,F0, 18, C9 
D0,08,R9,02,3B,D5,02 
R8.13,RB, 05,82, C9, 02 
05,A9,01,8B.D5,02,83 
,D6,HB,D5,02, 00, 01,60 



:?l3 TfiTF!FI2,vf5,^: 

554 DRTHR2. 14-8E 

555 LRTR01,60,R9 

556 DRTH8B.QE.CF 

557 imflSz.38^B. 

558 ERTRR9,F0, 

559 DfiTFlD0,FIi,fi9 

560 DfiTRFF.CR.00 
:,-■: mi^:--2 ^j-Hh 

5*'i IiRTH80,3E,eC. 
564 DRTfiE0,7E,E0 
T-6=j HiiTfll6,60. 

566 DRTfi3? lf.-CC 

567 DRTRli?. 17.. C0 

568 DRTfle2,i;.3.>i'L 

569 DRTRC2,;jr,:.4C 

570 DHTRC2,02,20 

571 LflTRD0.06,fit. 

572 BfiTflflIi.,Cl,02. 

573 l)ftTM2 ■ m ■ i'6 

574 BRTRfcF,^..^. 

575 DRTRfle-BC,02. 

576 DRTRig-RS.CE 

577 I'RTR00,8D,C5. 

578 DfiTR02,4C 

579 DfiTfl03,4rj,R9. 

580 DflTR8S..^.SS: 

581 DRTR4C,11,17. 

582 DRTRC6,02,R9. 

583 DRTfiH,17,C9. 

584 DRTH02,fl9,06. 

585 DRTfll7,C9,2F. 

586 DhTflH3,e8-8i 

587 D6TflC5.2E D0 

588 jmPBRjW-iCS. 

589 DRTRl;;'.;^. 0] 

590 DRTR8D<C5,0; 

591 DflTRB8,0B,8D. 

592 DRTRC5.02.4C 

593 DRTR13.R2.FF. 

594 DRTHEfl,8D 

595 DRTFI02,4C,11. 

596 DRTfi8D,C6,02, 

597 J3flTR4C, 11,17, 

598 DRTRS:; D0/01 

599 DRTH32,90,01 

600 DflTfiS^ iCS^FC 

601 DRTR02. 20,94 

602 I'RT(HEfi.C9,20. 

603 DFITR50,Efl,R9, 

604 DRTRER,R9.01. 
685 DRTR1E,C9,2E 

606 DRTSD0.B5.FI9 

607 DHTRC9,2B.F0 

608 DHTFffl0,01 60 
689 DHTBeS.FE-BB 

610 DflTRR9,2E,8D 

611 DHTRBR,96,fl9, 

612 DRTHFF,8D,B2. 

613 DRTR0F,18,20 

614 DRTRCR,02,20 

615 DRTflD2,FF,68 

616 DflTfl20,F0,FF. 

617 DflTR02,:>7, !:.!!.. 

618 BRTRB0, 16.R2. 

619 BF)TH8E,0e 30 

620 DflTHD0,F2,Cfl 

621 DRTRR0,10,83 

622 DRTRC6,00,D0 

623 DRTRB8, 16,20. 

624 BRTHCB,02,Fl9. 

625 DfiTRC0,lE,60. 

626 ERTFlE9,8D,0C, 

627 DRTR00,3D,0C. 

628 DRTR00,D0,EC. 

629 D6TRD0,FD,Cfl, 

630 DRTfl20,B0;16. 

631 DRTRR;.' B8 

632 DRTR8£ 0G-9B, 
S33 £:"TRD0,F4,E8, 

634 DRTH00.8E,0C. 

635 DRTRB0, 16,20. 

636 DRTRC9,03,D0, 

637 DRTR03,85,08, 

638 BflTfifc}.: 30 

639 IiRTRD0,F3.R0, 

640 DRTRE0,80,D9, 

641 DRTR6t> R9,62, 

642 nmflih R9/4S, 

643 DRTR85,00,R2, 

644 DRTfi90,88 J D0, 

645 ERTRF3,C6,00, 

646 DflTR02,fl9,Bl, 

647 DflTR16jflB.ee 

648 BRTR20.B0.16 

649 DHTR02,B0,01 

650 BRTR6D,CF,02 

651 BRTFI6U, <.**,:&:,: 

652 DflTH80.R0,40. 

653 HhTflFD.E8,E0. 

654 DRTRQii-'.yl' C? • 

^•r- LiHiHf.v,aE. n . 

'[•il L'HTREC,02,RE. 

657 DRTR20,36.19. 

■■&» mrm?.w ;?>., 

659 DflTfiHS..;;>9,s!v 

&S& DRTfiBC,02.1S 

6t : .i \><rrm::.ze.'M , 

662 DRTR60,R2,07 

6f,3 IiMTRG2,BD,26 

664 BRTR2B, 19, SB 

665 DRTflRC BC 92, 

SSb L(fiTf(Ffl..Fr,f-i&. 

667 iJRTRBE,02,RE 

'ify-3 DHTRFF..i--)J, j): 

669 BRTRBE,02,RE 

670 DRTRFF R9 20 

671 DRTR02,RE,BD 

672 BRTRRF ■ ■ ^ 02 



B5.1E,8E,C0, IE 
CB,02.C9,02.D0 
00,8B,D5,02,R0 
,02,D0,03,CE,D0 
,20,95, 15, 68, R8 
,0C,90,fl2,FF,CR 
,0C,90,R2 
,FD,88,B0,Dfl,60 
,80. 8E,0C. 90,88 
.E0,F0,D0.F3,R0 
,90.S8,B0,Ffl.r:R 
,F3,R9,3C,20,B6 
, 17, SE, 16,69, 16 
■16,D5.15,RB,15 
■27,E8,13.RD,C2 
.D0,08,R9,00,8D 
■47. 17. R9. 01, SB 
.7E,17,RB,C1,02 
C0,02.8B,C1,02 
■8B,C0,02.RB,BC 
■02.RB,BD,02.8B 
26,18,20,07,18 
■RE,BB,02.20,36 
■C9,20,B0,0B,R9 
■02,fl9.20,8B,C6 
17,RE,Cfl,02,D0 
14,C9,0F,D0,0B 
.R9,02,8D,C5,02 
,C9,10,D0,0B,8D 
■04,8D,C5.02,4C 
11,D0,0B,8B,C6 
8D,C5,82,4C,U 
D0.0B,8D,C6,02 
C5.02.4C. 11. 17 
0B.8L.C6.02-R9 
02,4C,11,17,C9 
3D.C6,02,R9.0C 
4C.11.17.C9.14 
C6,02.R9,8E,3B 
11,17,C9.2B,D0 
,SE,FF,02.ER.ER 
■02,fl9,18.8B.C5 
.17.C9.28.D0.0B 
■H9,12,3D,C5,02 
.4C,CF,16,RD,B3 
.60.flD,Cfl,82,C9 
60.20,94,E0,R5 
B0.01.68.CE.D3 
E0.R4..63.B1.50 
• D0,F4,fl9.2F_ i 9J_ 
,06,20-20,3"F,R2 
.4C,lC,16,AB,Bfl 
■D0,0B,CE,D2,02 
■20, 3D, BR, IE, 60 
■01,60.RD,Dl,02 
. 20,94. E0.R5, 63 
,01.60,CE,D1,02 
BR, IE. R9, 02, 3D 
01,20,ED.15,R9 
02,60,R2,15,R0 
.F0,FF,fl9,00,RE 
. CD, DD.R9. 29,20 
■H2.15.R0,05,18 
al >,D0.02,RE,CF 
. i .J,60,R9,0fl.20 
.03,86, 00. R2,Efl 
.R2,D0,R8,10.88 
.D0.F3.8E,0C,90 
.D8,FD,Cfl,D0,F3 
.E2,60,R9,0F,20 
■EB,15,R9,3D,8D 
■20,8D,B5,1E,SD 
■R9, 02,85,00,09 
98,20,03, 16. R9 
90,20.03,16,06 
R2,FF,FI0,2R,88 
D0,F8,60,R9.14 
R9,64,3D,CR,02 
,R0,FF 
88,D0,FB,C6,00 
E0,FE,B0,EB,R2 
90, 60, R9, 05, 20 
,16,RD,CE,e2 
,20,B0,16,R9 
R2,C0,R0,90-8E 
D0,FD.E8,E8,02 
30,88,D0,FD,E3 
F6,C6.00,D0.E3 
B0.16.20.R6 
C9.02.R9.03 
R0.C0.8E.0C 
FE.Cfi.E0.7E.D0 
D0,EB.60.EE.C8 
20.B0.16.20.R6 
02,F0.05,R9.02 
4C,BF.16,RB,Cfi 
60,CE,Cfl,02,60 
8D,CF,02,R9.00 
8D,D8,02.60,Fl2 
8E,0C,90.88,D0 
FF,D8.F3,60.R9 
02,A2,00.8E,C0 
02,FlC,BE.02,8C 
■BF,02,8E.BB.02 
R5,CE.C9,29.D0 
" 00.4CFC16 
RE,BB,02,RC 
20..F6,FF,fl9,07 
R5,00,20,B2 J FF 
3E,86,82,RE,C0 
19,8B,C3..82,BB 
C4,02,20,R0,18 
RE, ED, 02, 18,20 
3fi.20jB2,FF,fir: 
BF,02,18,20,F0 
20,D2,FF,60,RC 
BF,02,18,20,F0 
20,B2,FF,RC,BC 
02.18,20,F0.FF 
BD,38.19,R2,07 



673 DfiTRRE.i: 

674 DRTR02,! 

675 BRTR14,f. 

676 BRTRC9,' 

677 DRTR7F,S 

678 BRTRFF.E 

679 BRTR02,f 

680 DRTR4CS 

681 DRTR2R,I 

682 DflTR60,; 

683 DRTR02.t 

684 DRTRCl.e 

685 DRTR60,f 

636 ERTR0l,S 

637 DRTR06,f 
683 DRTR1D.I 
639 DRTfi69,C 
630 DflTRCl.E 

691 DRTR51.1 

692 DRTR18.F 

693 DRTRF2.1 

694 DfiTHSE,! 

695 DRTRRD.e 

696 BRTHR2,E- 

697 DRTRBD.E 
693 DflTR60.C 

699 DRTR60.C 

700 DRTR60.C 

701 DRTR60.C 

702 DRTR60,F 

703 DRTRE0.2 

704 DRTRD0,1 

705 DRTR06,S 

706 DRTR32.S 

707 DfiTRR7,5 
70S DRTR60,B 
709 DRTR8E,4 



■.SJ..-.T 

,22,31 
■22,91 
■■..CI.-8Z 
,21,ER. 

,06,R9. 
. sy 06. 
'■,2P.-y-3. 

■ ■;..£. -ov. 

,C1,02 
.03, 8B. 
'..06.R9 
,25,D0 
,60,C9, 
,C9,20, 

Ki ■:;•:: ■ 

,C9.1C, 
,02,R8, 

■ 1F..C9, 
. 3F.IC 
,60,RD, 



.EFl.20. 

,4F,S7. 



>,B2;FF,RE,C5 
1.85,00.BD,0B 
00.00.R5.CB 
4C,C9.17,R9 
RD. 20, 91, 02 
2fl,B0.06,H9 
60, RD, IF, 91 
Efl,Efi.Efl,Efl 



00, 8D, CI, 02 
29.D0, 06, R9 
60,C9,lfl,D0 
CI. 02, 60. C9 
04, SB. CI, 02 
86,R9,02.8D 
13, D0, 03, 20 
B9, 03, 28, 57 
CI, 02, 60, RD 
B0,0fi,R2,15 
0B,8C,BD,02 
IB, F0. 01. 60 
02.R0.0B.8C 
C0.02.D0.01 
04,CE,BD.02 
04,EE,BC,02 
04, EE, BIT, 02 
03,CE,BC,02 
F0,FB,60,20 
36, 19, C9, 20 
8D,4B,1F,R2 
8D,62,1E,3E 
8D,R7,1F,8E 
IE, 8E. 26. 96 
4B, 1F.R2, "" 



, 97, 8B,82, IE, 81 



.82 



PERDV. 

5 PRINT"PRRTIE 2" 
10 F0RZ=6288 TO 7967 
20 REflDOC* 



40 POKEZ,OC 

50 NEXT 

6(5 PRINV-OK "Z 

■■-!>:f.. : -;;; . i?.\ -POKEi^i, i < 
200 B=3 

FQRI°1T02 - 

fl=nsc<hiD*ioc*,i,i)~ 

202 D=D*16-t-R+',R>3>*7 NEXT 

0C«D ■ RETURN 
'i.yt'i V:-ra?6,R9,2B.8D,R7, IF 

iW:VR57,8B,26,lE.8E,26 
502 DRTflfl9, 00,85, 05, RD,C4 
.;-!-j:;. T.-T.-(E9.1E.18..;:H.1B.2FI 

;;iTfl69,D8, 85,00, R9, 00 
535 DRTfl35..01,R9,B8,85,02. 
■;->^ vri-^.:.--:.^.:---..;^.:^ 
507 DRTR88,3C1,03.4C.C4, 18 
:„•;..■; ;;.. .-■,:■:-. ,,- .^\ : .. ..;.:. <;,.■ -:■;. 
-.(■■:•> y :■■:■■■•.. >:■■■:■ •:■ ■>■ J. >«. ■::;.: 
'■■■M-; ij ; -(--f(!..:'i,nSj.F7,fi5,05,ls 

';,].;; j; ! rHrfi65.i.if=;,i:iri,C3.02,38 
512 DRTfll3,2R,13,2fl,18,2fl 

51 i BHTH 

' ■ I ■■ ■ I. ■:■,■•■■ 

515 BRTRR0,07,B1,00,11,04. 

-.;.; [,■■-; ;■■.;;.;■; )(, y- , ffj..^.. j: ■ 

517 DFITRBE, SF, :■■;;.: S::.,^m.- i';F 

518 DRTfl91,fl7j00,e!i v-c ■--■■■ 

519 BFITfl21,27,23,29,24,lF. 

520 BRTR29,5D,5B,5E,5C,00. 

521 BRTR85,00.S5,FC,R9,1E. 

522 DRTR9e,lS,65,ew V-~- ■ ■■<- ■. 
■ ■.'-■■■"!"^..-- P . .;-i:. 

';.-: !!;■)■•■.■'■ ?-ft ■::. .'■■■■$ h >,!■■:::■ 

•/,:•:■■ Dfr-nv =;;;.:;>! r.;. > u. :£,■•- 

:;v. l*fiTRFB.R5,FE.65,FC,85, 

; -..V: ] ■■.■.. : • . . . 

'■. ■■ .:■■■.'.>.■ i-'..i. i . . .■■ 

■■■ /;■■ !■■■.'. • ■ ..■■■. ■■■ .i: 

■?:*' ^-1^01,01,01,01.01,81. 

531 ERTP.01,01,01,01,01,01, 

532 BRTR02,07,06,0:i ■*:■: V-S, 
'-■■: : ' y;irH07,07,07,07,07,07, 
534 ERTfi07,07,07,0?,C -# : . 
335 DRTR07,06,06,«[ .0 ■ 06 

■,-(>.'■:■■ ii ■■,■■.■(■ ■!■.., 

:;;,;■ . . ;■ . . . .■.. ■..■ 

533 DflTRR9,00,85,00,R9,lfl. 

^ FB,R9,1E. 

540 ERTRR9. 00.85, FD,R9, 96. 

541 DRTRR0,00,B1,00,91,FB 

542 DRTR7E,19,91,FB,88,D0. 
:>s/; L.:"iTfl01,E6,FC,E6,FE,R0. 

544 DRTR80,91,FB,RR,BD,7E, 

545 DRTRFD,C8,C0,FR,D0,F1, 

546 DRTflFF.fF FF,0a.03 

547 DflTRFE, FE. FE, 80 80 

548 DRTH03, 03 . 83. S3 - f'i i?.j 

549 BRTFl80,30.30.R5.R5.fl5, 

: :'-; I.-!' s-tii. i^.:38.3E,3B,3fl, 
":''■:-: ■i---^- .CS-- >:',■■■!. ■ ■■■. ■:,-,, 
553 ERTRF3 

.... ;... 

::.-:: ; -. : <v.<:F;. : ';.;.; V.' , _ r 
:■■:.:.■. ; -3:^,i0, 

557 DRTR0F.0F,0F,0E,0E,0E, 

358 DRTRF J - F 

:^:;« ^iR5R,DB,18,FF,FF,18, 

560 ;:i:R00.FF,00,FF,FF,18, 

561 DRTR00,00,00, 18, 18,00, 

562 DRTR08, 4;: 3C , i"! , 2-^ . 3 ■:,.: ■ 
'_•■■■: S^TiiVJfM=1M:3C.24 J a4,3C^ 
564 DRTR08,00,10,3fi ;.i 

":-.■•;■ ui~::-aw, i-:-, re, 10, 10,10, 

1 .- 6L 38, 



567 DRTR09. 

568 DRTR00. 
563 SRTRe>3 

570 BRTR00. 

571 DRTR3E. 

572 DRTR54, 
5^3 DRTR3C. 

574 DRTR3C. 

575 DRTR34. 

576 DRTR3C. 

577 DATR03. 

578 DRTH00. 

579 DRTFIC0. 

580 DRTRC8. 
531 DRTR03. 

582 BRTRFF. 

583 DRTR80.. 

584 DRTR00, 

585 DRTRB7. 

586 DRTR32, 
537 IIRTR3C, 
583 DRTR3C, 
589 DRTR13, 
598 DHTR60, 

591 DRTR10, 

592 DRTH18, 
393 DRTH08, 

594 ERTR7C, 

595 DATR08, 

596 DRTRFC, 

597 DFlTRFC, 

598 DRTFI18, 

599 DflTRFE, 

600 DATR7C, 

601 DflTRFE, 
692 BRTR7C 
6H3 riFITFi7C 
W. DHTHCP 
SWi Dfii^si:;:. 



77.44.74 

77, 55, ^6 
70,42,60 
54,54,75 
14,3E,14 
FE,54,FE 
7E,F7,FF 
7E,EF,FF 

"■fro? 

7E,FF,FF 

■■- v>-- ;■!<- 
'■■;■■■:*: •:«■ 

-■■■ ;■?'.■•>,• 
■:- : $■;:,, n 

FF.-7F JC 



-./ ■;■.!.■-;■: 

■T. ■■;■:. [:■:; 
7E,DB,FF. 
7E,DB,FF 

!ft, -8,1S 
;«;..<;'.:■> 
33,54,FE. 

•■4. 1^ yF. 

es.if..., ic, 

FE,0E,D6; 



14,77,00,00 
55,75,08,00 
42,70,00,00 
54,54,00,00 
3E,14,3E,14 
54,FE,54,FE 
F0,FF,7E,3C 
0F,FF,7E,3C 
FF,FF,7E,3C 
B7,F7.76,34 
8F.0F. 87,03 



5 l!RTR2>: : i,: 
■ TiHTMSC),.- 
1 DATR20.S 
: CRTR20.S 
■; DRTR2S,; 
? ERTA28.; 



,26,28 

.2^,2^.. 

,2<!i,2vi. 

,20,28 

634 DRTfi29,2ti,2f:.20 



.h . t,e - :. 



>-;2!2:.' ;; 
DRTft20..S 

liFlTH2:V. .:. 

:,^'""i v v.:w,; 

. DRTR20.2 
Fe,F8,E8.i:n 7ir!i=i DfiT(n;-(n . ,ji 
BRTA20..2' 
W!]f.2i-i,2' 
BRTR28,2j 
DflTREE.2 

i.**-^ 5 h": 1 

uvi^ft :.- 
;:-■■<■. ..... 



8E.R7 620 



69, IC 624 

R9. ID 625 

91,02 626 

R9.D0 627 

04, 18 628 

26,05 629 



69, D3 632 



91,02 635 



29,25 638 
26,22 639 



'■■■.■,m ,. : 2. 
■■-■■.;*, ;;.: 

!■■ W.->:.F 
i ; S..i:lF.:;\- 

FE, 86.176. 
FE,0F,C6, 
E0,40,80, 
H 7 , Of .. liF 
73,42.63. 
94,95,94, 
S88 :r' : Fi3E,41,9D,fll. 
689 BATR00,7E.42,5R 
Fit. r>fi7W£i,FF,w.FF 

611 DfiTA80,7F,48.5F 

612 DRTf-i00.FE..ti2,FFi 

613 T'MTFi:;m,5T;..5==:.5F. 

614 BRTR5R,DR,1R,FR, 

615 BRTR5 R,5R.5^..5Fi.. 

DATR00,7F 

['Mr:iis.i.7t 
EFil"fi5H. 5<7< 
DRTA5R/5B 
DRTfl5R,BR. 
BATR5A,DB. 
BRTR5R..BB. 
DATR90.FF 
',■:■■":■,:"•■'"■:.■. 
IIRTR80.42 

(|;.,TH,'I ■:.».: 
U :'! flf'lj - Fllj 

DRTA18,10. 
DATR18,3S. 

W-TilSij.7-. 

DRTR3E, 14, 

W! H20. ■ 7F 
L-J-.f^V-- .""'■ 
DRTA34,76. 

:-'-:l!-ii;. ?r... 



40, 7F, 
5FI,5fl, 

V : : =■:'■■. 



83,88,8S,CC 
ED,C3,66,3C 
BB,E7,7E,3f; 
13, 13, 18, 13 
FF, 80. 08,00 
flfi,82,54,38 

ic^ic'ic'ic 

E6,C6,FE,7C 
03,18,13,18 
1C,70,FE,FE 
3C,02,FE,FC 
FE, 18, 13, IS 
FC,06,FE,FC 
FC,C6,FE,7C 
18, 10,38,30 
7C,C6,FE,7C 
7E,06,FE,7C 
00,80, E0..C9 
8F.0F, 87.03 
42,72,00.80 
35, 9C, 80. 00 
fll,9D,41,3E 
5fl,42,7E,00 
FF,90,FF,80 
5F,5S,5B.5R 
FR, 1R.DR.5FI 
5F,40,7F,00 
Ffl.02,FE,00 
5R,5R,5R,5R 

7F'i40!.'7F.O0 
5R,5R,5A,5R 
5fl,5A,5fl,7E 
5B.53,5B,5R 
DA,lfl,Dfl,5A 
FF,08,FF,8 



,20V2fj 
,22- a? 
,2'j,2^ 

■ 2i2i . 2-Ci 

■ 2=i ■ 3ti 



2!;, :;:«. 
■ :■ 6 ■ 2 ■ 

, Cm.Ck, 
2i : j, 2;t; 

■•:<<., j if. 



28,20,28.28 
,20,96.96.96 
,37,36,28,28 
,20,20,20,28 
,20,20,20,28 
.20,28,20,20 
■20,20,32,20 
.20,28.20,38 
■20,2 6,20,2 

• 1 k"i . 
20,20,28,20 
^0,20,20,20 
20.20,28,28 
20,20,28,20 
20,F0,EE,20 
20,20,20,28 
28, 28, 20, F8 
DE,C8, C0.C8 
C0,C8,C0,C0 
" FD,20 
0F, 20, 20-28 
12,20,28,20 
28,20.20,28 



-",FF,13,I 



!,Sfl 



■,FF,18,DB,5R 



:;ri,2<. 
:?L.,24 

1M.J3- 

7C, 10 

6i . :2e . 
44,74. 
55,56. 
4.J.M. 
:>i ■ 7^ . 
■3E.,14. 
54, FE, 
F7,FF. 
EF,FF, 
~7,W. 
FF,FF, 



85. FE 644 1 



03,82 653 1 



■C3,42, 
,Ffl,BC, 
,EB,FF, 



Li- '• :■:!' '.' ■ : 
DRTA03.e 
FC.Cfl 646 DRTRFF.-F 
BRTR00,!! 

;: ( iv;.2--,i 

("■i:rt27i- 
2--iTii32,T 
DRTA3C7 
03,07 652 ERTR3C7 

BRTR18, 18,13,18 

81,87 654 DRTR00.00,00.FF 

i,86 655 DRTR10,33,54,FE 

:,66 656 DMTR18.24, 13.08 

85,01 658 DATR7C.FE,0E.D6 

85, FC 659 DRTR08,0S,00.08 

85, FE 668 DflTRFC , Ft • 02 , 86 

fifl.BD 661 DRTRFCFE, 02.3C. 

F3,E6 662 DRTAIS, 18, m, 03 

•-i; :: i 2^;-. i»"--K : '!;., i: i: -ji : .i ■ :-?j 

19,91 664 DRTR7C, 
DATRFE, 
DATR7C, 

r.;i' : -^'.i. 

DRTAD7, 

R5.BD 669 DRTA08. 

DRTR00, 

;:?■■: fi-jo. 



6C. 33, 18,80 
14.77,00,80 
55,75,00,00 
42,78,00.00 
54.54,00,88 
3E,14,3E,14 
54.FE.54.FE 
F8,FF,7E.3C 
0F,FF,7E,3C 
FF,FF,7E,3C 
D7,F7,76,34 
8F.8F, 87,03 

3,00-00,00,00 

3,00,80,E0,C0 
3,F0,F0,E0,C0 
1,00,01,07,83 



■. ■ ''■■:. ■ -K- 
;.06.C6 

:.Fi6.C6 

: ;.r>?."t 

;!,-!2.62 

i,95,94 
..9D,A1. 

20,20 
C0,C0. 

;^.^. 

FB.28 

■:;:,. 7;- 

2s;,^m 



CE.CE 672 J 



58, 5E 674 
88, F8 675 
38,38 676 



FS,F8 678 



.;:.Vii}7-2>. 
I.;?! F,!2«.. 
7^:7 ..7:;s, 

7i- : r--. 1; 

D,i"f'7i 
ERTAEE, 

DHTR87.- 
DRTR20.- 

:■=*-= r ---rs".:^ - 

:■.!(■■:■=■.>:■ 
7i-( ■ . ; i2ii. 

.■(■■■■' 



■•C3- 66.-3C 
BB,E7,7E-3C 
18.18.18,18 
FF, 08. 00, 00 
flfl. 32,54, 38 
08,18,08, 18 
1C1C.1C.1C 
E6,C6,FE,7C 
08,18,18,18 
1C70.FE7FE 
3C,82,FE,FC 
FE, 18, 13, 18 
FC,86.FE,FC 
FC,C6,FE,7C 
18,10.38,38 
7C.C6,FE,86 
7E,06,FE,7C 
RR,32,54.38 
3C,7E,FF,FF 
42,72.08,00 
95, 9C, 08.00 
A1,9D,41,3E 
5R,42,7E,00 
F8,C0,C0,C0 
C0,C0,C0,C0 
20,20,20,28 
20,08,01,20 



ee,; 



'jt: , 05 , 20 - 2" , Fy , C0 , FD 
28-20, 28, 26,28, EE.C0 
i70,C8,C0,r:O,i:;0,C:8,r:0 
C0,C0..FE.20,28,20,20 
2G,22).2i;!,2tJ.2i2,20,20 
20,20,28,28, 20. 29, 28 



RERBV. 

5 PR I NT "PART IE 3" 

10 F0RZ=7968 TO 9647 

20 REflBQC* 

30 8OSUB280 

40 POKEZ.OC 

50 NEXT 

;-■ i-s^f-i-ov ■.:; 

70 P0KE631,13l;p0KE198,l 

208 B=0 

201 F0RI=IT02: 

2B2 D=D*16+R+(R>9>*7: 
NEXT :0C=D: RETURN 

500 DRTRDB, 20,20,20,20, 1 

501 DATR20,20,20,20,20,2 

502 DRTR20,DD, 20.20.20,2 

503 WVTA10,20, 20, 20,32,£ 

504 DRTR2E, 20, 20,26,31,: 

505 DRTA20, 20,20, 20,BD,i 

506 DflTA20,20,20,20.20,; 

507 WITA20, 20,28, 28,28, 1 

508 DATR20,20,DD,20,J 



511 DATADB. 20,20, 20, 20,20, 2 

512 BRTR20,20-20,20,20,20,2 

513 DHTR28,DB.20,20,20,F0,E 

514 DRTRC0,C0,C0,C0,C0,C0,C 

515 DATRC0,C0,C0,C0,C^,C8,i; 

516 DRTREE,20,28,ED,FD.20,2 

517 DATR20.20,20,20,20,20,2 

518 DflTfi20,2S.£0,;^.S:0,El>,F 

519 DATR20,20,20,F0,C0.C0,C 

520 DflTRC0,C0,C0,C0,C0,C0,C 

521 DRTRC0,EE,20,20.28,2e,2 

522 BRTR20,BD,86,B1,R0,90.8 

7.77, :.'i-"m. ■■«>■ -i- ■ ;H ,:■!':■■&■■ ■■> 

524 DRTR20,20, 20.20. 28,20, 2 

525 DRTRC8, Us ■ r ,0, «; ■ C8 , 7:17 - f 
52(T. riRrf!i70,i:.0,!7ti.C«.C8.FL,2 

527 DRTA28,20,2B,28.20.2E.2 

528 DRTRRE,B7,02,RC,B6.02,i 

529 BRTAF0,FF,R9,28,R2,04,8 

530 BRTR02,28,B2,FF,60,00,R 

531 BRTR8B,B6,82,8D,D7,02,8 

532 DRTR02,R9,30,8D,D9,02,6 

533 DflTRRD,B8,02,C9,01,D0,0 

534 DHTRD7. 02,68, C9, 02, D8.0 

535 DflTHD6.02.60,C9,03,D8,0 
:;.-;:: iirtTFili?, 02, 68, i79, 04, D8, 

, Lit 60,80,R D7.0 

;:f-T,i0B,F0,01,60,RE,B6,0 

53S L'f-iTR16,B0,86,R2,00,8E,D 

■■■■■■• H [jr-f"h»y.F.(i,FF,Ii«,2iJ,R2,l- 

541 DRTRD6, 02,60,08 s:2 SC.^ 

DATARE.B6,02,D0,4C,RC,D 

7-<7 :.,.^.u,.<;7 W ■■:■;- -;i77.^7..t: 

>!■; ;.f : iTR0i,60,AD,C8,02,C9.5i 

!Vi : H01 , 68, AD, D9,02,F0, 

546 DATRD9,02,60,20,4R,2I.R 

547 DflTREE, JJt ■ 6,;, RE ■ F7, sK;, > T c 
543 DRTR02,20,36,19,R5,CE,C 
549 DflTRF0.efi,flC,D6,02,C8,l 
558 DflTRE7.4C,16,2i7i,-K.^S.2 

551 DRTRER.ER,ER,Efl,ER,Efl,E 

552 DflTREfl,RC,D6,02,RE,B7,0 

553 DRTR36,19,C9,28,F0.,03,4 

554 DRTR20,RC,D6,02,flE,B7.0 

555 DRTfl28.F0,FF,flB,8B, 19.8 

556 BRTR02.R9,4F,20,E2,FF.C 

557 BRTA02,20,30,21-RE,D6.0 

558 BRTR05 , RC , 07 , 82 . S--* , V-6. K 

559 BRTH8B.B8, 02,28,28, 20, 2 

568 BRTR20,RC,B6,02,RE,D/.0 

561 BRTR36. 19,C9,20,B0,83,4 

562 BflTR2e,EE,BS,02,RD,B8,0 

563 DRTR05,F0,0D,fl6,05,8E.Di 

564 BRTHR4,06,8C,B7,02,4C,F 

565 BHTfl4C.16,28,08 !■.'-', ?>•..& 

566 BflTflR9,90,fl2.80,fl0,30,8 

567 BRTR90,88,B0,FB,CR,D0,F: 
!'"»': H'.v.:i,iik ■:"':? 7.?. -fiM-.il 

569 BRTR88, 08 , RO C 1 , 82 , C9 - 8 

570 BRTR06.R0,0i,8C,B7,82,6i 

571 DfiTfl02,D0,06,R2,0fl.8E,B 

572 BflTR68,C3,03,E8-^ •:: 

573 BRTRB7, 02, 60, R2 86 SE, is 

574 BRTR60, 00, 80, 00, 00,00,0' 

575 BRTR00,00,4C,F0,3F,80,0f 

576 BRTH-R. 2ii , 2H, 90,08, R2,8 

577 BRTRR1,82,4C,R5,17,RE,R 

ASUIVRE. 






MINI LOGO 



Amusez-vous par ces quelques oommandes graphi- 
ques apparentees au LOGO. 

Jean Luc RIVES 

Mode d'emploi : 

Permet de creer une multitude de formes (dessins, lettres, etc) par 
I'intermediaire d'un petit ver de terre qui se deplace sur I'ecran. I isle 
des commandes de base : 

A : avance {avec trace) 

R : recule (efface trace) 

G : tourne a gauche de 90° 

D : toume a droite de 90 s 

S : saute (leve plume) 

T : couleur de la trace 

F : fin (efface I'ecran, retour au menu) 



r .__. letermc ftc 



A suivre : 

En raison de la longueur 
inhabituelle du listing, 
nous passerons ce pro- 
gramme en deux lois. 



TI99 BASIC SIMPLE 1 « 2W5S£ 



Deplacement : ACTION (1 lettre), nombre de pas (2 chiffres) et 

appui sur ENTER. Exemples : 

A01 : avance d'un pas 

A1 3 : avance de 1 3 pas 

R04 : recule de 4 pas (efface la trace) 

G : tourne a gauche (90° ) 

D : tourne a droite (90° ) 

S15 : saute de 15 pas (sans effacer le dessin) 

T02 : change la couleur de la trace et prend la couleur N° 2 lors de 

la prochaine avance. 

(.'option 1 du menu donne acces a I'ecran 2 pour le choix des cou- 

leurs d'ecran. Effectuez votre choix en positionnant la fleche devant 

la couleur desiree et validez par RETURN : FCTN + X permet le 

deplacement vers le bas, FCTN + E le deplacement vers le haut. 



160 GOTO 250 

170 OPTION BASE 1 

1B0 Dili CHtSI .COl IB) .P(B) 

190 BW0=X=Y=S1=CF=CV=T1=T2=T3=T4=S0-!TR: 

j=SA=KEY 1 =KEYZ=KE Y3=KE Y4-NB-SW 1 000=SW 1 ( 

=SW 1 0=SW 1 =KO=ST=K t =K2=K9=K=J=I 

2O0 W=DI"I=FM=M*=RH=LI-RV=C0 

210 DIM W(25).VH<32) 

220 CALL CLEAR 

230 PRINT "FIN DE PROGRAMME" 

240 END 

250 CALL CLEAR 

260 PRINT ■' MINI LOBD" 

270 PRINT " ' 

2BO PRINT 

290 PRINT " 1 MINI LOGO" 

3DO PRINT : : : 

310 PRINT " 2 DEMONSTRATION" 



330 PRINT" 3 FIN" 
340 PRINT :::: 

350 PRINT » 

360 INPUT "VOTRE REP0N5E ? : 

370 IF D-l THEN 440 

3S0 IF D=2 THEN 420 

390 IF 0=3 THEN 220 

400 PRINT ii"ERREURl TAPEZ i 

410 GOTO 360 

420 t 



430 
440 D=0 
450 Dt1= 



430 



H&O f 



1=30 



1,5,4,59,8,9,9 



470 DATA 1,37.2,2.42,3,3,' 

6.9, 10. 104,10,11,112,11,12,120,16 

4B0 RESTORE 

490 FOR I=il TO B 

50O PID-0 

510 NEXT ] 

520 CALL CLEAR 

530 Sl-0 

540 CALL 5CREENC14) 

550 FOR 1=1 TO 8 

560 READ M, X,Y 

570 CHU)=X 

530 COKI)=Y 

370 GR(I>=W 

600 CALL CHAR(CH(I)."O0FFFFFFFFFFFF") 

610 CALL C0L0R(GR(I).CD1 (I>, II 

620 CALL HCHAR<I,5,CH(I>,3) 

630 NEXT I 

640 CALL CHAR<64, " 00002060FF602 " > 

650 CALL CHAR(91,""> 

660 CALL HCHAR <<.■», 64) 

670 H-24 

680 M*=" COULEUR ECRAN ?" 

690 V=2 

700 GOSUB 5450 

710 GOSUB 5490 

720 1=1 

730 J— 1 

740 IF D=I THEN 760 

750 GOTO 810 

760 J-J*2 

770 At="lO1010131O131111131O101O13il; 

13101013" 



7B0 B«»SEG»(A*,J,2> 
790 KO=VAL(B«> 
BOO GOTO B30 
810 CALL KEY!5.K0,ST> 
B20 IF ST=0 THEN 810 
S30 IF K0=10 THEN 360 
B40 IF KO=tl THEN 920 
B50 IF K0=13 THEN 9B0 
860 IF I>7 THEN 810 
B70 1=1+1 

880 CALL HCHARCI-1.9,91) 
B90 IF P<I) = 1 THEN 860 
900 CALL HCHARU.9,64) 
910 GOTO 740 
920 IF I<2 THEN BIO 
930 I-I-l 

940 CALL HCHAR (1+1. 9.91) 
950 IF P(I)"1 THEN 920 
960 CALL HCHARU.9.64) 
970 GOTO 740 
9B0 IF 31=1 THEN 1110 
990 IF Sl=2 THEN 1240 
1000 IF Sl=3 THEN 1370 
1010 IF Sl=4 THEN 1500 
1020 IF Sl=5 THEN 1630 
1030 CALL SCREENIC01 (I>> 
1040 CF-COKI) 
1050 P(I)=I 

1060 M*=" COULEUR DU VER ' 
1CI70 GOSUB 5450 
'1080 GOSUB 5490 
1090 31=1 
[100 GOTO 740 



1440 H=24 




1500 
1510 
1520 
1530 
1540 



) GOSUB 5450 



) GOTO 740 



2130 
2140 
2150 



M«="3-EME TRACE" 
QOSUB 5450 
GOSUB 5490 



CALL CHARI 
CALL CHARI 
CALL CHARI 
TR«0 

SWO-0 
SW=1000 
K9-96 
H-24 



1B3C6666FFFFFFFF"] 
0F3F7FCFCF7F3F0F " \ 
FFFFFFFF66663C18": 



1130 MS="COULEUR VER ' 

1140 GOSUB 5450 

1150 CV-CD1CI1 

1160 SI -2 



1810 
1B20 
1830 



) GOSUB 5450r 

) Sl=5 

) GOTO 740 



1 M»="4-EME TRACE" 
) GOSUB 5450 
) GOSUB S490 

> P<I>=1 

) T4=C01 (I) 

) H-24 

) V=2 

) M«-"BEBIN ==>FCTN-5 OU ENTER" 

) GOSUB 5450 

) GOSUB 5490 

) IF D=l THEN 1790 

> CALL KEY(S.KO.ST) 
) IF ST-0 THEN 1760 
) IF K0=14 THEN 480 
) RESTORE 5510 

) CALL CLEAR 

CALL CHAR ( 1 16, "F0FCFEF3F3FEFCF0" ) 
CHARCU3. "FFFFFFFFFFFFFFFF") 



2210 RH=12 

2220 

2230 

2240 

2250 

2260 

2270 

2280 



■ SW0=1 THEN 23: 



BD=29 

CALL HCHARIRH.RV.il 

CALL HCHAR(RH.RV*1. 



SO- J 



'=40 



1200 M«="COULEUR ■ 
1210 GOSUB 5450 
1220 GOSUB 5490 
l'.TKi SOTO 740 



-ERE TRACE ' 



-ERE TRACE" 



1290 Tl=CDltI> 



1320 M*="Z-EME" 

1330 GOSUB 5450 

1340 GOSUB 5490 

1350 SI =3 

1360 GOTO 740 



1390 M»="2-EME TRACE" 
1400 BOSUB 5450 
1410 GOSUB 5490 
1420 P(I)=1 
1430 T2=CD1CI) 



2OO0 
2010 
202O 
2030 
2040 
2050 
2060 
2070 
2080 
2090 



) CALL CLEAR 

) CALL SCREEN(CF) 

) CALL COLOR(ll,CV,CF) 

J CALL C0L0R(9,T1,T1) 

1 CALL C0LOR<10,T2.T2) 

1 CALL C0L0RI12,T3.T3) 

) CALL C0L0RX1,2,CF) 

1 CALL C0L0R(2,T4,T4) 

) CALL C0L0RI3,7,16J 

3 CALL COLOR (4,7. 161 

> CALL CHARI4S, 

) GOTO 2100 

1 TR=0 

IF NB-1 THEN 2020 

IF NB=2 THEN 2040 

IF NB=3 THEN 2060 

IF NB=4 THEN 2080 

K9-96 

GOTO 2310 

K9-104 

GOTO 2310 

K9=120 

GOTO 2310 

K9=42 

GOTO 2310 



2300 GOSUB 3010 

2310 IF 0=0 THEN 2340 

2320 READ KO 

2330 GOTO 2360 

2340 CALL KEY (5. KO. ST) 

2350 IF ST=0 THEN 2310 

2360 DM=9 

2370 GOSUB 5410 

2380 IF K0=65 THEN 2470 

2390 IF KO=6B THEN 3940 

240O IF K0=70 THEN 250 

2410 IF KB=71 THEN 3560 

2420 IF K0=82 THEN 2510 

2430 IF K0-B3 THEN 2530 

2440 IF K0=B4 THEN 2560 

2450 CALL SOUND (500. 1 10.20. 1 10. 20. 1 10 

,-4.0) 

2460 GOTO 2310 

2470 H=24 

2480 V=7 

2490 MS^'-A" 

2500 GDTO 25SO 

2510 M*="R" 

2520 GOTO 25B0 ... 

2530 SA=1 



2560 TR=1 

2570 M«-"T" 

25B0 GOSUB 5450 

2590 GOSUB 5490 

2600 IF D=0 THEN 2630 

2610 READ Kl 

2620 GOTO 2650 

2630 CALL KEY (5, KI, ST) 

2640 IF ST=0 THEN 2630 

2630 IF (KK4B) + (K1>57)THEN : 

2660 CALL HCHAR<24. 9,K1 1 

2670 FOR 1=1 TO 30 

2680 NEXT I 

2690 IF 0=0 THEN 2720 



A SUIVRE... 



WUMPUS 



Participez a ce sport perilleux (et mysterieux) qu'est la 
chasse au WUMPUS. 

Laurent PERRON 

Mode d'emploi : 

Lancement en # 0, les ordres possibles sont affiches. Le WUMPUS 
vti dans une cave de vingt chambres dont chacune possede trois 
tunnels menant a d'autres chambres (faites-vous une idee de la 
disposition par le schema). Pour varier les parties, les pieges sont 
disposes au hasard. Deux chambres possedent des puits sans fond 
dans lesquels II vaut mieux ne pas tomber (vous perdez). Deux 



FX 702 P 



autres chambres abritent des ctiauve-souris geantes; si une d'entre 
elles vous attrape, elle vous entrains dans une chambre au hasard 
ce qui est plutot genant. Notre WUMPUS n'est pas gene par ces 
pieges, II possede des pieds ventouses et est beaucoup trap gros 
pour les chauve -souris. En general monsieur roupille, mais deux 
choses peuvent le reveiller : votre arrived dans sa chambre et votre 
tir de fleche. Une fois reveille, il peut bouger, Tester tranquille ou 
vous avaler si vous etes a sa place, ce qui vous en conviendrez est 
une triste fin. Vous pouvez a chaque tour visiter une chambre, (1-4) 
indique le nombre de chambres que vous desirez visiter, ou bien 
tlrer I'une de vos cinq Heches. A une case de distance, I'ordinateur 
vous previent de la presence d'un WUMPUS par un message shgni- 
ficatlf. 




LIST 

i vac :mn eiPRi 

CSI 4l"« HUilP 

as «*":»e=i+im 

CS8SW«F« S 
=1 TO 5 

i e=wtit wmi 
mm c=b in si 

IF fl(D=B !rH 
2 

1 NEXT CtiKMiH 
EXT B:t="BBC[EF 
BBIJftBHOPORST" 
iFOB 11=0 TO S 

4 flt(B)=«MB!B>, 
l):Ci=C(tflJ(fl!i 
NEXT Bifl6S='BEF 



BCH":B7»="B0JtE 

5 A«J="flSr!AfiO":fl9 
|="FHPB6I"lB8t= 
"BJlCiriBlt=»J 
UtMOr:C=S 

6 B2)="LHSEI0":B3 
t="F«T8«r:B«= 
"lPffiQS»:«5<="» 
R!OPS"i««IT 25 

? fl(=B5»:6S! 39:D 
=B:6SB «IPH " 
VOUS EIES EH"!B 
ISBC ISIBT 2B 

B STBI lilF SS<24 
!Bt=«lt(SS,lilfi 
SB 39:fl(SX-5)=B 



ISOTO i 

S F0« E=2! 10 23: 
FOR F=» TO 4: !F 
B(F)=«»(E.l) 
;6SB 3S*F/2 

IB HKT FIHEXT E:P 
RT "TUHNEIS EH 
"SlMfiVrOTI 

11 I«p'"B0U6ER OU 
TIRER",Rt:IF Ri 
='T" THEH 26 

12 IF Rt*T THEH 
11 

13 HP "00 FILLER". 
F:F=IHT (BBS F: 
IF SBH (21-FHS 



SB f& THEH 13 

14 FOR E=IS TO IS: 
IF B(E)tFiHE)iT 
EMF F>0!PRT "B 
OH VBLftBLE":60T 
13 

15 SBC :B5S=Hlt(F, 
i):FOR E=0 TO 4 
!IF «t(E)=B5(IB 
SB 17*E/2:60T0 
SI! 

li HEXT EiEOTO 20 

17 PRT "CHUTE DBMS 

OH PUIT'tSTBT 

23:RET 
1! PRT "2BPV ZAP 

•,"OHE CHAUVE S 



OIMS..":F=ltRn 

HM2l:ST«T 1S:R 
ET 

19 PRT "IL V A 09 
HOBPUS"iSTBI 16 
:RET 

20 At=A4U6SB 39i0 
=B:6SB 41U=ttB 
4!:84*=!tI5(2i»S 
9nit4,I) 

21 IF B4««B5« THEB 

7 

22 PRT "LE HBHPOS 
VOBS A EU" 

23 PRT "HA HA TO E 
S HURT": IBP "OH 
E AUTRE PBRTIE" 



,Rt:IF R1="H";£ 
hD 

24 IBP "HEBE PLUM" 
,RtlIF R)="B" T 
HEN! 

25 I=HID<1,2B)*CJ: 
FOR 8=8 TO Slflt 
t!)=rIU(S*21,U 
:BEHT BI60TO 5 

26 IBP "8BELLE FOR 
CE l.'4",F:F=IHT 

(BBS FUF S6H 
FtS6H (5-F!>2 T 
HEH 26 

27 FDR E=16 TO 19: 
A<E!=Eti:SEXT E 
IFOR J=l TO F:P 



RT "CHABBRE H"i 
J; 

28 IBP B<Jt!5>:ie 
T J:E=16:IF BBS 

S8H (69-B7)tBB 
S SEN (B8-B6)t2 
THEH 27 

29 6SB 4 1 : FOR 8=21 

TO 23: IF HID<6 
■ li=HID(8<E),l) 
THEH 31 
31 BEST 6:RWI»(2 
l«RAHt)3,lj:SSB 
39:A(E)=B 
3! Rt=HIO(A(E),l): 
IF A)=»5)iPRT " 
LA FLECHE REV1E 



HH60T0 23 

32 IF flt=A4t!PRT " 
LE BUHPOS EST H 
OR!": SOTO 24 

33 HKE):E=E*l:lF 

Eil5*F THEH 29 

34 K-l:PRT "FLEC 
HE :";K:IF K=8I 
PRT "PLUS DE FL 
ECHE":60TB 23 

35 PRT "RHTE":60T0 

28 

36 PRT "UH COURAHT 

I AIR":RET 

37 PRT "IL V A 00 
BRU!T":RET 

33 PRT "CB SEHT LE 



HUBPUS":RET 
J9 FOR B=l TO 28:1 

Fm»<B,;>iH 

EXT 8 
48 RET 

41 t=IIID<l,28)tBt( 
D/2*5.5):IF FRB 
C (D/2)t8l(=«10 
I1,23):RET 

42 t=HIB(l,28)t»ID 
(24,3):RET • 



C'est nouveau, ca went de sortir 



GARDEZ VOS LUNETTES 

DE SOLED. 

DM REPASSERA PAR LA ! 



II paraitrait que vous n'atmez 
plus Lode Runner. Dommage ! 
Vous qui avez acquis un Mac 
el qui ne disposez que de 
Mac paint ou Macwrite pour 
vous eel ate r void votre version 
de LR disponible autrement 
qu'en version pirate. Le gra- 
ph is me, blen qu'en noir et 
blanc, ne gache en rien la qua- 
lite intrinseque du produit, faut 
dire que le graph iste de Bro- 
derbund sort des studios de 
Waft Disney. Rejouissez-vous 
car vous aurez, cette fois-ci, la 
doc complete et en frangais 
pour creer vos tableaux. Sinon, 
pour tous les autres, il vous „ 
faudra altendre encore pour ZZZT 
recevoir le troisieme LR 
trois dimensions. 



Lode Runner 



DU RETARD DANS L'AIR 



Le 8256. genereusement an- 
nonce dans I'HHHHebdo 
comme etant deja dans les 
stocks d'Amstrad, sans la doc 



SSSV 



en frangais, vient tout juste de 
prendre le bateau pour arriver 
sur nos cotes d'ici quelques 
semaines. La diffusion ne 
pourra done pas, de toutes les 
fagons.debuter avant mi-octo- 
bre. Si vous etes vraiment 
presses, telephonez a Ams- 
trad, ils se feront un plaisir de 
vous donner I'itineraire du 
cargo, a votre charge de le re- 
joindre a la nage ! 



v< 



[ERDEZ 



Je vais tout vous expliquer. 
Les principes philosophiques, 
les grands preceptes sociaux, 
la vie, tout. 

Voila : je suis tres enerve 
parce que Gargoyle Games 
vient d'annoncer son intention 
de laisser tomber I 'environ ne- 
ment celtique qu'il avait adopte 
pour ses deux derniers jeux, 
Tir Na Nog et Dun Darach au 
profit de t'ospace. Oui, desor- 
mals, le cadre des jeux de 
cette companiel sera I'espace. 
Vous m'emmerdez. 
Si on me dlt qu'au fond d'une 
foret lointaine, dans un pays 
recule sur une planete incon- 
nue il y a un monstre qui de- 
vore tout ce qui passe a portee 
de crocs, franchement, je m'en 
fous. Mais alors, complete- 
ment. Je n'irai jamais sur 
cette planete, ejjcma 



contre les Hhiyfeojaez, qui 
sont particulierement cruels. 
Un jour... 

Vous avez peur ? Pas moi. 
Mais maintenant, regardez : 
On savait depuis 1976 que 



RffiS uk pays et a plus forte 
ralson dans cette foret. Je 
m'en fous. 

Si, par contre, quelqu'un arrive 
a me faire croire que si je 
remets les pieds chez mon 
boulanger habituel un assassin 
fou meurtrier sadique va me 
sauter dessus, alors la, je vous 
garantis que je ne remels plus 
les pieds chez le boulanger en 
question. Parce que c'est pro- 
che de moi, parce que c'est 
une menace directe, parce que 
j'y croirai . 

Pourquoi Spielberg a-t-il tant 
de succes ? Parce que ses ET 
arrivent dans une ville banale, 
rencontrent des gens normaux, 
se heurtent a des problemes 
cou rants. 

Ecoutez : un autre monde, un 
autre temps. Dans le monde 
de Cryhulisk, la guerre fait 
rage- Les Fkvfejhg se battent 




I'Union Sovietique etait capa- 
ble de fabriquer des micros 
emetteurs de la taille d'une 
tete d'epingle. L'ambassade 
des Etats-Unis avait revele I" af- 
faire en en trouvant une cen- 
tal ne dissimulee dans ses lo- 
caux (authentique). Mais les 
autorites militaires des USA 
viennent de mettre au point un 
bidule... 

Et la ? Les autorites militaires 
n'ont encore rien declare, mais 
ce n'est qu'une question de 
temps. Et vous etes vises, di- 
rectement. Alors, imaginez un 
jeu (ou un film, ou un roman) 
dans lequel le person nage 
principal (malefique, bien en- 
tendu) est votre voisin du 



AMSTRAD A VENDU 
UN 6128... 



Au mois de juillet. Pour le mois 
d'aoul les ventes ont decolle 
de maniere sensible : 2600 
exemplaires, rejoignant du 
me me coup les scores des 
464 (2800) et 664 (2680). Les 
resultats de la societe viennent 
paralielement d'etre annonces 
en Angleterre : pour I'exercice 
allant du 1er juillet 1984 au 30 
juin 1985, un benefice de 20 
millions de livres a ete degage. 
Hum... C'est vraiment beau de 
voir les jeunes boites aligner 
les zeros dans le positif, parce 
que les vieilles de leur cote, 
c'est plutot dans le negatif 
qu'elles assurent (80 millions 
de $ pour Commodore, 45 mil- 
lions de C pour Sinclair...). 




UN PETIT SPEED 



La cartouche absolue pour le 
C64 vient de sortir des limbes 
du cerveau d'un ingenieur de 
Robcom Limited. La societe 
commercialise depuis quelques 



vlO 




jours une cartouche Turbo 50 
qui vous ouvre des perspecti- 
ves passionnantes : lecteur de 
K7 dix fois plus rapide, lecteur 
de disquettes cinq fois plus 
speed, interface Centronics 
J30ur brancher.une..irjjorjraant& T - 



autre que celles de Commo- 
dore, 16 nouvelles instructions 
eTeiJwfd P° ur d'squette et K7 (dont 
- " copie de fichier) et un bouton 
de reset pour permettre aux pi- 
rates de s'exprimer pleine- 
ment. Cette Rolls de la cartou- 
che vous coutera 500 baltes si 
les revendeurs ne se sucrent 
pas trop au passage de la 
Manche, 



VIVEMENT LE DERBY 



Depuis les debuts de la micro- 
informatique familiale, r adapta- 
tion d'un programme du 
Commodore sur le Spectrum 




pose des problemes dramati- 
ques. Que ce soit Activision, 
avec Ghostbusters ou Beamri- 
der par exemple, US Gold, 
pour Raid Over Moscow ou 
Beach Head, ou Ocean, avec 
Daley Thompson's Decathlon, 
les versions destinees au 
Spectrum souffrent d'un man- 
que de qualite attristanl Les 
prog ram meurs restent bloques 
par la gestion des couleurs en 
haute resolution completement 
nulle et les capacites sonores 
ringardes a souhait. Seuls ont 
echappe au massacre des 
titres tels que Bruce Lee ou 
Zaxxon, logiciels ou I'originalite 
et la richesse intrinseque tra- 
versent intacts les epreuves de 
I 'adaptation. Une seule solution 
s'offre aux fanatiques de Sin- 
clair : attendre la sortie du 
Derby (la version 128 K du 
Spectrum) pour esperer voir 
enfin des adaptations du ni- 
veau des originaux, et pour- 
quoi pas superieures. 



CP/M PAS MORT? 







Deux illustres inconnus, 
Matmos Limited et Computer 
Appreciation, proposent actuel- 
lement en Angleterre un micro 
compatible CP/M pour 3000 
francs. Le Matmos PC 
comporte une unite de disquet- 
tes et la compatibilite au sys- 
teme d 'exploitation sus- 
nomme, c'est tout. Pour 
le moniteur, comptez 1000 
balles, ce qui vous fait la confi- 
guration complete a 4000 
francs. Ca ne vous rappelle 
pas vaguement les prix dune 
boite nommee comment deja ? 
Ah oui ! Amschtrad. 



^ATP CAgOE CUtfptE 






V ALLIANCE DES 
TOCARDS 

Jusqu'au mois de mars, MCC /Qfc&L $P ***$!!&*) 
avait participe a la competition (Mft 
concernant le catalogue de 
softs le plus nul. Depuis pres 
de six mois, nous ne recevions 
plus de nouvelles de cet im- 
portateur base a Monaco, 
Nous qui lavions cru disparu 
au fin fond dun casino, le void 
qui reapparaft dote dune nou- 
velle vigueur : dorenavant c'est 
Vifi (le specialists de la sous- 
merde pedagogique) qui distri- 
buera les produits du premier 
sur fe territoire frangais. En- 
core des intoxiques de la regie 
moins par mains tigale plus. 

13 
11 




AMSTRAD S'AUTOPIRATE 



Amstrad nest pas seulement 
un fabricant de micro-ordina- 
teurs, c'est aussi un construc- 
teur de materiel Hili. L'an der- 




il avait lance un 
magnetophone comportant 

deux lecteurs-enregistreurs de 
cassettes permettant de real ■ 



ser des copies de cassette a 
cassette a deux fois la Vitesse 
normale. Dernierement, I'al- 
faire a ete saisie devant le tri- 
bunal par le PBI, ('equivalent 
britannique de notre SACEM. 
La possibility de faire des 
copies incite en effet les utili- 
sateurs a... copier. D'ou baisse 
des ventes, d'ou manque a ga- 
gner du PBI, d'ou proces. Mais 
le juge a decrete que le seul 
tort d'Amstrad etait de vanter 
trop ostensiblement la faculte 
de copier dans la publicite. 
En 1979, j'ai moi-meme achete 
une platine a double cassette 
a Londres. Ello ne cnpialt qua 
Vitesse normalo En 1984. 
Aiwa a eu des problemes avec 
le meme PBI : son propre lec- 
teur cop:ait a 4 tois la vitcsse 
habi'ijoi-'e. En fan. c'est pas m- 
terdit do copier, mais c'est In- 
terdit de copier vlte. ■ 



LA GROSSE TETE 

C'est Infogrames qui va bientot deux-lrois jeux un peu moins 
avoir besoln dun decametre pourris que d'habitude ils 
pour se mesurer le tour de croient etre les meilleurs de 
tele: depui s qu ils ont sorti France du Monde. A preuve : 
/^7-rv^» 4ifl;»ji-A«/r~^ dans la derniere edition d'un 
fOQLieup^ HiCUWE (,fl,\ canard professionnel anglais 
( &P0S9E TETE Bri tAOTo! Computer Trade Weekly (ex- 
N ■ clusivement reserve aux reven- 
deurs, editeurs de softs et 
autres labricants de hard), une 
pub vante leurs capacites a 
faire mieux que tout le monde 
et ce partout, meme en Angle- 
terre. Je me marre : Thomas 
£ SCHMIDER s'engage meme a 
V creuser le tunnel sous la Man- 
che pour ameliorer les rela- 
tions entre nos deux pays. Ca 
colle, Thomas, vient a I'HHH- 
Hebdo j't'offre une pelle et je 
t'emmene au bord de la Man- 
che. 




MESSIEURS LES ALIENS, 
TIREZ LES PREMIERS 



La societe Imagine fut. a 




gine, creee sur la base d' 
poignee de jeux d'arcade 
pondus par un jeune talent 
d'une qulnzaine d'annees. De 
ces debuts prometteurs naquit 
une societe qui ne sut conser- 
son avance sur le Spec- 
i par manque d'imagina- 
Aujourd'hui propriete 
d'Ocean, Imagine continue a 
sortir quelques produits, tous 
aussi lamentables les uns que 
les autres. Dernier en .date de 
ce domaine, Zip Zap ne retien- 
dra ('attention que des neophy- 
tes du Spectrum. Les habitues 
de la machine ne supporteront 
guere la pauvrete du jeu, au- 
tant par son graph is me que 
par son interet. La generation 
actuelle de softs n'autorise 
plus que rarement de produire 
des logiciels de ce niveau, 
heureusement I Zip Zap 6' ima- 
gine pour Spectrum. 



LE HARD CASSE GUEULE 



WH Smith, un nam que vous 
commencez a connaftre (le 
deuxieme distributeur de hard 
et de softs en Angleterre;, va 
cesser petit a petit de distri- 
buer du hard dans I'ensemble 
de ses boutiques. Les reven- 
deurs sont appeles a se spe- 
ciahser dans le soft, en particu- 
lier pour Amstrad, Commodore 
e; Smcia'r Apple disparaftra 
ainsi d6linitivement des vitri- 
nes. ne correspondant a au- 
cuno demande Outre -Manche. 
Actue'iement pour plus de 100 
boutiques reparties dans le 
Royaume Uni, seule une cin- 
quantalne continue a proposer 
des mccs Visiblement, ils en 
avaient ras le stock ! 




C'est nouveau, pa Went de sortir 



ARRRRRGH! QUE C'EST BOOO.. 



Vous beneficierez dans les 
jours qui viennent de I'inexpri- 
mable bonheur (ou de I'indici- 
ble extase) qui consistera a 
placer dans votre lecleur de 
cassettes ou de disquettes (au 
cholx, suivant les moyens du 
bord) Summergames II. Les 
gars d'Epyx n'ont pas fait les 
choses a moitie, loin de la. La 
version pour le Commodore 
occupe trois faces de disquet- 

tES &iS<?JrT7ES: Lf 
COUtHH Po^ToMgEP 
ftp Of Cut 




tes bien tassees, remplies 
comme des bo i tes de sardi- 
nes... Et il n'y a pas que du 
vent dedans : les animations 
vous mettent sur le cul en 
moins de 3 secondes, la musi- 
que est nettement plus meil- 
leure que cells d'avant qui 
1'etait beaucoup plus moins 
bonne, les epreuves sonl dix 
fois plus rusees, bref c'est ge- 
nialemenl genial. Vous hesitez 
encore ? No problem I Vous 
reussissez un bond fabuleux 
au triple saut, un ecran geant 
au-dessus des tribunes an- 
nonce votre n'om, votre perfor- 
mance et passe le ralentl de 
votre bond. Vous rattrapez mal 
votre cheval apres la barriere, 
il choit et vous vous retrouvez 
au fond de la riviere. Un petit 
coup de kayak ou d'escrime 
pour vous remonter le moral ? 
Facile I Vous retrouverez huit 
nouvelles epreuves, toutes 
plus reussies les unes que les 
autres. A posseder dans les 
secondes qui viennent. Un 
seul imperaiif : disposer d'un 
joystick supra-confortable 

sinon gare a la galere I Sum- 
mergames II d'Epyx pour 
Commodore et tres bientflt 



PLUS VITE QUE 
LA LUMIERE 



L'editeur Holt Saunder a deja 
lance sur le marche anglais un 
bouquin bourre de program- 
mes et d'astuces en to us 
genres pour le Commodore 
128. Parmi ceux-ci des jeux, 
des programmes educatifs et 
des applications serieuses 
fonctionnant soit sous le mode 
128, soit sous le mode CP/M. 
Le bouquin se vend 12,95 
livres (140 francs). Que tous 
ceux qui veulent taper les pro- 
grammes patientenl : le C128 
ne sera pas commercialise en 
Angleterre avant le 15 septem- 
bre! 




POUCE, POUCE, POUCE 



Les vilains mechants qui lais- 
sent en liberte de fausses in- 
formations n'onl qu'a bien se 
tenir : la disquette trois pouces 
se porte on ne peut mieux. 
O'apres les chiffres, on ne peut 
plus ofticiels, du departement 
de I'industrie japonais la 3' 
remporte un vif succes puis- 
quelle represente a elle seule 
autant d'exportations que I 'en- 
semble des autres disquettes 
(pour les neuf premiers mois 
de I'annee). Amstrad en 
consomme a lui tout seul (le 
grand goulu) pres de 300.000 
unites par mois, en prove- 
nance des deux seuls fabri- 




cants locaux, Maxell et Natio- 
nal Panasonic. Out I Remettez- 
m'en trois pouces, j'ai eu peur. 



FACE A FACE 



Y a pas, mals les combats par 
micro interpose, ca se pose la 
comme divertissement : nette- 
ment plus puissant que le re- 
portage en direct sur la guerre 
au Bantoustan inferieur pen- 
dant le journal de 20 heures 
Chez Microprose Software. Ms 




ont bien pige I'astuco et, quitte 
a livrer un produit pauvre en 
graphisme. offrent le plaisir de 
flinguer son petit trere ou sa 
maman a grands coups de mi- 
trailleuse dans les reacteurs. 
Freud n'avait rien compris . 
rien de tel que de se battie. 
chacun dans son coucou a es- 



sayer de flinguer r autre. Ca 
e'en est de la therapie de fa- 
mine, garaniie HHHHebdo. En 
resume : vous pouvez jouer 
seul conte I'ordinateur, a deux 
I'un contre I'autre, a deux 
centre I'ordinateur. et a quatre 
deux contre deux. Chacun des 
joueurs dinge un avion, chan- 
ge ant au fur et a mesure de 
revolution des combats Vous 
passerez alnsl du blplan de 19 
lusqu'au chasseur bombardier- 
coniemporam. Pour un appa- 
reii donne vous devrez adapter 
votre pilotage a ses caractens- 
tiques ; un appareil recent se 
dirlge en hgne droite avec des 
demi-tors serres et dos atta- 
ques en pique alors qu'un 
vieux coucou pourra naviguor 
entre deux airs alouvoyer, tour 
ner et virevolter. Une psycho- 
therapie assuree : le premier 
logiciei de jeu adapte aux fa- 
milies en enso Mlg Alley Ace 
de Microprose Software pour 
Commodore 



JAMES BOND 64 



Dang e u re use men t votre, alias 
A view to a kill sortira en ver- 
sion francaise le 9 septembre 
en cassette ET en disquette 
pour : Oric, C64, Amstrad, 
Spectrum et MSX (ce dernier 
ne beneficiant que de 2 jeux 
sur les trois, manque de me- 
moire oblige). Prix des casset- 



tes : 150 francs. Prix des dis- 
quettes : 200 francs. 
Comment ? La version dis- 
quette ne coute pas plus que 
le prix normal + le prix de la 
disquette vierge ? C'est pas du 
vol ? Au secours, je veux 
qu'on me vole, j'ai plus I'habi- 
tude d'etre traite honnetement ! 




LE MSX EST UNE FAUTE 
DE GOUT EN SOI 

et les 16 Ko a 1990. En plus, 
ca va tenement mal qu'il pro- 
pose le depflt-vente aux reven- 
deurs pour 1544 francs, lis ont 
tout compris, les japs, lis bra- 
dent au double du prix de 
KAmstrad ou de I'Oric. 




EFFET SECONDAIRE 



CRL sort un jeu d' arcade don't 
le litre est "Blade Runner". Sur 
quoi est base ce jeu, sur 
"Blade Runner The Movie" ? 
Non, sur "Blade Runner The 
Music". En effet, les concep- 
teurs ont prefere s'inspirer de 
la partition de Vangelis plurot 
que du film. C'est un choix, 
caries, mais il est idiot. 
C'etaft la minute subjective du 
Docteur Scott. 



WW rem j\ 



MERC1! 



Philips et Eureka nous ont invi- 
tes, nous, pauvres journaleux 
sans era v ate, a lavant-pre- 
miere de "Dangeureusement 
v6tre", le dernier James Bond. 
Vous savez bien sur qu'un jeu 
en a ete tire sur Oric, Commo- 
dore, Spectrum, Amstrad, 
MSX, Enterprise et dans quel- 

«&«/ 



ques temps sur Thomson et 
Apple II. Ceci expliquant cela, 
nous avons done pu voir ce 
chef-d'oeuvre kitch que d'au- 
cuns trouvent nul et que moi je 
trouve tres bien. 
Eureka organisait cette projec- 
tion en tant que distributeur ex- 
clusif en France, mais que ve- 
nait faire Philips ? Simple : la 
cassette du jeu est ofrerte a 
tous les acheteurs de MSX 
Philips. C'est un peu embetant 
car c'est la plus mauvaise 
adaptation (elle ne comprend 
que deux des trois jeux), mais 
bon, il faut bien que Phiphi 
vende ses rasoirs a touches. 
Moi, j'aime bien James Bond ! 
Meme si c'est toujours un sa- 
vant fou qui veut devenir le 
martre du monde, parce que 
j'aime bien les savants fous 
qui veulent devenir maftre du 
monde. 

Le programme sera disponible 
cette semaine. 



INDICE DES PRIX 



Chez Dixons, a Londres, le 
Commodore Plus 4 se vend 
900 francs et on peut acheter 
un OL a credit pour un total de 
2500 francs en payant 120 
francs par mois. 




ASSOCIATION LUCRATIVE 



Arnsoft (filiale logicielle d'Ams- 
trad) et US Gold se sont asso- 
cies pour le meilieur et pour le 
pire sous le petit nom de Arn- 
soft Gold. Vous aurez bientflt 
droit a Beach Head, Raid et 
Bruce Lee pour 169 balies en 
version disquette. 
Amstrad tout seul va sortir 
aussi un compilateur basic, 
ainsi que Stuntrlder, un pro- 
gramme dans lequel, au gui- 
don d'une moto, vous devrez 
sauter 12 autobus sans vous 
viander a I'arrivee. Tres dur. 




LA FIN DELAC5 




La C5, cette voiture electrique 
de Sinclair n'est plus fabriquee 
depuis quelques jours. En 
effet, Hoover, le fabricant, a 
decide de ne plus commander 
de pieces tant que les dettes 
de Sinclair ne sont pas re- 
glees. Rappelons quand meme 
qu'a I'heure actuelle, cette voi- 
ture ne coute que 2400 francs. 
10.000 unites ont ete vendues. 
soit le dixieme des previsions. 



PANPAN ET BOUMBOUM 
SONT DANS UN AVION 



Alors que la revolution des 
jeux pour micros se poursuit 
vaillament, laissant apparaftre 
de subtiis melanges d action et 
de reflexion, Broderbund prend 
son courage a deux mains et 
sort (enfin) sur Commodore un 
pur prod u it d 'action. Heritier 




d'Axis Assassin par la qualite 
graphique et sonore, Stealth 
marque un nouveau pas dans 
I'arcade pure. A bord de votre 
chasseur, vous devez detruire 
une tour sur une planete deso- 
lee, defendue seulement par 
des batteries de DC A automa- 
tiques et des avions kamika- 
zes. La nullite consternante du 
scenario s'oublie des les 
commandes prises en main : le 
graphisme extraordinaire, la ra- 
pid! ie des adversaires el I'ob- 
jectif a portee de vue vos 
transportent dans un univers- 
manicheen ou il fait bon vivre 
(survivre ?). A travers les cinq 
niveaux du jeu, vous decouvri- 
rez les ruses diaboliques d'un 
ad versa i re sanguinaire pret au 
suicide pour vous detruire. Un 
must a cote duquel Mad Max 
fait figure d'enfant de choeur. 
Stealth de Broderbund pour 
Commodore, Atari et bientflt 
Apple. 



AU 
VOLEUR! 



Ca y est, les journaux de BD 
se mettent a publier des lis- 
i I Bon, le journaux en 
question est americain : il 
s'agit de Mad Magazine, qui 
fut voici 20 ans un journal ge- 
nial, a I'epoque ou Harvey 
Kurtzmann, Jack Davis, Bill 
Elder, Wood Wallace et Will 
Eisner deversaient leur genie 
tout au long des pages de cet 
eminent canard. Depuis, ga a 
bien change. C'est devenu 
plus gentil, plus "bon esprit". 
Mais la, ce mois-ci, surprise ! 
Une partiedu journal est consa- 
cree a I'informatique. On y 
trouve des listings pour Apple, 
Atari, IBM et Commodore (ils 
dessinent tous la tete d'Alfred 
E. Neuman, I'egerie du canard, 
ce petit cretin avec de grandes 
oreilles), des bandes dessi- 
nees sur les ordinateurs, un 
dictionnaire des mots utilises 
en informatique (Menu : ce que 
vous ne reverrez jamais apres 
avoir achete un ordinateur, 
parce que vous serez trop 
pauvre pour pouvoir mettre les 
pieds dans un restaurant. Pro- 
grammes : ce que vous regar- 
diez a la tele avant d'y bran- 
cher un ordinateur. Ram : ce 
qu'on fait devant un ordinateur 
(adapte). Fenetres : endroit oil 




Ton jette les ordinateurs apres 
avoir accidentellement efface 
un programme. Chips ; genre 
de saloperie qu'on mange pour 
ne pas avoir a quitter son ordi- 
nateur au profit de la table fa- 
miliale). 

II est tres difficile de trouver ce 
magazine en France. Quel- 
ques librairies le possedent, et 
a Paris on peut le trouver dans 
les kiosques de St-Michel et 
de I'Opera. En plus, il vaut 
pres de cinquante balies. 
Ca me rassure, j'ai eu peur de 
la concurrence. 



PCW SHOW DEVANT, 

SHOW! 



Suite de la page une. 



({'Enterprise 64 et 128 Ko. plein de 
softs connus rnais ma! adaptes, des 
goodies (chapeaux, badges, auto- 
collants) distribues a tire-larigot et 
des liotesses veiues de shorts 'plus 
short que moi tu meurs'. Oui, iis y 
vont au flan : ils continuent avec 
entrain a ne pas en vendre. 



Excluslf : la photo de I'unique Apple 
de I'expo. II est la pour mettre une 
Imprimante en valeur. 



nier, le PCW 8256, qui fait rien 
qu'a essayer de faire le mangle en 
faisant jamais pareil que ses freres. 
Les petlts neveux etaient venus 
pour I 'occasion, comme vous ne les 
' pas, les voici : 



Albert Crayon Optique : 







PHOTO DE FAMILLE 

Monsieur et Madame Amstrad 
etaient presents, bien sitr, avec 
tous leurs rejetons, le 464 (qui a 
bien vieilli, le pauvre. mais c'est la 
vie), le 664 (une sante de fer), le 
6128 (qui a une tete a vouloir bouf- 
ier tous les autres) et le petit der- 




dans les placards, sur la moquette, 
sous la moquette, ' dans la mo- 
quette, a cote de la moquette, par- 
tout I Des 520 ST a foison ! Des 
260 ST, aussi ! Et un 260 STD, 
pour faire bonne mesure, celui qui 
a un drive integre et 256 Ko de 
Ram I 

Et les softs, attention I Les pre- 
miers com men cent a faire leur ap- 
parition. Le plus nul d'entre eux est 
douze fois meilleur que Lode Run- 
ner (c'est Mission Mouse, photo ci- 
dessous) et le plus beau, Psycho- 
sis, c'est un petit bonhomme (pas 
si petit que pa, d'ailleurs, il fait un 
tiers de I'ecran) qui court partout, 
monte dans les maisons. court 
dans les rues, fait des derapages 
incontroles et tout grace a un joys- 
tick habilement branche" sur la ma- 
chine. L'animatlon est, euh... per- 
fane. C'est un mot nouveau dont la 
definition est : 'definit la quality 
d' animation d'un jeu tournant sur 
Atari 520 ST'. Superbe. II y a deja 
plein de tableurs, de feuilles de cal- 
cul, d'utilitaires mais touiours pas 
de basic ni de Gem Write nl de 
Gem Paint et on ne le repetera 
jamais assez. 



vous douter que ca represente un 
paquet d'octets. Cinq cent millions, 
pour etre exact. La photo ci-des- 
sous, c'est un CD (habituez-vous, 
ca veut dire Compact Disc) couple a 
un ordlnateur. Les images defilent 
sans cesse et vous pouvez regarder 
la demo pendant vingt minutes, 
vous ne verrez jamais deux fois la 
meme image. Mercl M'sieur To- 





SOFTGRAMMES DE JEU 

Oh, les beaux eriiteurs qui etaient 
la Oh, surtout I'infernal Jeff Winter 
et sa botte Llamasoft, qui vlent de 
sortir (encore) un nouveau produit, 
qui traite de boucs mutants, comme 
d'habitude, sur CBM 64, comme 
d'habitude. J'aime bien Jeff Minter. 
Son nouveau jeu s'appelle Batalyx. 
Woh, lui, eh, j'en fais autant. 



I Qui, il est la, II y en 
plein partout, sur les etageres, 



COROLLAIRE 

A cote d'Atari, parce que c'est Atari 
qui I'a presents seneusement le 
premier, le lecteur de disques a 
laser. Vous savez qu'on peut sta- 
cker trois fois I 'Encyclopedia Britan- 
nicae sur un seul disque, et quant) 
bien meme vous n'auriez jamais lu 
cet eminent ouvrage, vous devez 




Microdeal a annonce son intention 
de developper stir IBM, notatnment 
un Backgammon et un jeu d'echec, 
ce qui est stupeiiant d'audace. Pas- 
sons rapidement. 

Tout le monde developpe sur Ams- 
trad. D'ailleurs, tout va sortir ou est 
deja sorti, alors inutile d'annoncer 
les litres. Vous voulez 
Kjhgsdfjhgqe ? Ca sort dans un 
mois. Et Xkjdss ? Oui, dans deux 
semaines. Bon, ga va, alors. 
C'est d'ailleurs assez enervant. 
Vous passez devant I'echoppe d'un 
editeur, vous voyez la pub d'un 
nouveau jeu : c'est pour Bruzo 64 
et Amstrad, ou pour Glandu 128 et 
Amstrad, ou pour Oupour et Ams- 
trad. Si vous avBz un Amstrad, 
vous avez de la chance. 



LE SALON DE L'ANNEE 

II est certain que ce salon est le 
plus significatif sur le plan micro en 
Europe. Ceux qui iront au Sicob se- 
ront decus : les organisateurs ont 
juge que les petits cons en culottes 
courtes qui piaillent le long des 
couloirs en s'extasiant devant des 
machines a 2000 balles n'etaient 
pas dignes de leur inleret. En 
consequence, cette ann£e, la micro 
sera reieguee au Sicob Boutique et 
le Sicob Boutique au palais des 
congres de la Porte Maillot (histoire 
d'emmerder un peu Micro-Expo) et 
Dleu sait que le Sicob Boutique, 
meme Porte Maillot, n'est pas en 
soi propre a susciter les passions 
les plus dechainees. Genre, le vrai 
Sicob sera reserve a ceux qui pen- 
vent prouver qu'ils son! victimes de 
I'impot sur les grandes fortunes. 
Vous savez quelle sera. la tendance 
85-66 : Sinclair garde la tete hors 
de I'eau, Amstrad fait comme si il 
erait tout seul, Atari, pendu a une 
cords, se balance pour avoir I'air 
d'etre confortablement install, 
Commodore est soutenu par une 
armee de fans et le reste se partage 
les os. 
Vous savez tout. ■ 



LE COURRSER DES LECTEURS 10 rt fin > Une voi,ure ^ a des 

fcB " **^***""*^*" *^ fc ** ^mmwrnmi pneus neufs et pas de mo teur 

Messieurs, lecteur doublement en meme temps que tout autre est avant tout une voiture qui 

occasionnel de votre hebdoma- chose. n'a pas de moteur. Pneus neufs 

daire (entendez par la que j'ai lu - Les partitions sont traite' es ou pas, elle ne roule pas. 

les numeros usage's que Von a comme des programmes basic. Sol sol re si sol, re I 
bien voulu me prSter) j'ai pu ap- A ce propos, je ne comprends 

pre'cier de quelle maniere amu- pas du tout votre remarque 

sante mais bien souvent atroce (suis-je le seul ?) sur leur porta- 
vous tentez rf'siw-i— - - - ™* ■ ;i -'~ 



Les listings ont ete revus et cor- 
riges 4a5 fois. 
anonyme I 

HHHH-Ton taux de frappe au 
ciavier : 80%. Ton taux de relec- 
ture : 12%. Ton taux d'estima- 
tion : 0%. Tous les listings ont 
ete verifies a 100%. Tu dois etre 



8AHAN€S 



Reponse a de nombreuses let 
tres : un arrobas (ou arrc' — 
que), c'est ca : @. C'est 
hein ? On en mangerait. 




FAITES 

COMME EUX, 

ABONNEZ-VOUS ! 




QUI VEUT MON DEULIGNE? 

La reprise de la conception des deulignes, c'esi Michel DUPORT vous conseille de creer une REM 

■- * '— de 23 caracteres puis de poker (a partir de 

I'adresse 16514) les codes suivants. Lancez par le 
deuligne associe. 



comme la reprise economique : on en parle a lon- 
gueur de lemps, on I'annonce, on la dit immi- 
nente, mais personne ne se risquerait a pretendre 
qu'elle est la. Ben taut pas croire que je vais me 
vanter de ce que les spezialists considered 
comme infaisable. Alors vous vous les remuez un 
peu ces meninges ? Y a que les habitues qui rea- 
gissent, c't'un monde ga madame. 



Codes machine 

i6?U JE 04. EC' 



!34 : P 



Listing Commodore 

S BftTfU65.*2@6 J 141.. 1 .212.. 163.-0. 141 
4.212, 169,33, 141,4, 212, ?€ ..49. 
0KE54296, 15 

1 FORR=0TO17:Rr:Bj3u P'Ui-.lf 49261 -H ■ H 

EXT P0KE56J,:4.. ;V POPE ■■ >, l.« ' P0KE56 

334,1 



Alain Le GALL uneligne en douceur pour ne pas 
surprendre par trap son micro. 

Listing Apple 

1 FOR. I = 768 TO 799: READ ft: POKE I, A; NEXT 
: CALL 768: POKE 16386,15: POKE 789,2: 
CALL 768: DATA 169,3,160, 9, 32, 317, 3,9 
6,0,1,96,1,0,17,15,27,3,0,64,0,0,1,0,0 
,96,1,0,0,3,239,216,0: HOME : PRINT 'M 
AlNTErWT GRACE A L'WILIENE, VA FRIHE 
RAYECT0N CATALOG 1NFIN3 Ill- 



Laurent CHAUSSIN vous demande un nom, le 
votre ou celui de votre voisine immediate. Atten- 
tion, ne depassez pas vingt caracteres. 

Listing Amstrad 

10 CLS= LOCATE 10f t&* INPUT H deYmez-M 

oi un tiow" : nom? ■ FfiPEJ--: O PEN i.. I'lOE 
E 1 ■ charssLEHt nom* >■- P i ;<-:*■ I s==ch.LU-sl:a 
: x=< 633-ehars*32 ">■ Z ■ LOCATE l . l : PEN 
3 'PRINT NOM*- 'PEN 1 = tx:=x = y=220 '*; 
=393: FOR f=i TO 8'x2=0 ; FOR 3=1 TO 
Pixels' IF TEST<K2,V2)=3 THEN PLOT 
X,Y,2'<PLQT X,Y-2 

20 PLOT x+2,a:PLOT x+2,y-£ ! x=x+4;: 
2=v£+2 : HE* P 9 = y =y -4 ■ y 2=y £-2 > ;<=tx = H 
EXT fi LOCATE 1, SPRINT SPHCE*<dw 
s^FOR 1 = 1 TO £500: NEXT 'GOTO 10 



Bulletin d'abonnement page 31 



Arnaud DANASSIE juge I'exactitude horaire 
comme Indispensable. A vous de profiler de sa 
manie. 



>-■■ r.LSi SCREENS,?, 4! LOCATEii lli INPUT "Heure 
I L LOLHTE1.. lUIN 

PUT'-H, 11, S de Is sonner ie ".: 3 1, S£, S3: CLS= G 
OTOI 

1 S=S+isftTTRBl,ls IF S1=H Mi'v S£ = H HMD So 
- THEWL0CATE3,1E:PRINTU5INC"## H ## H 

ati S";H.^,S:FnRI=eTO50:PLHY°O5L5l1IP ,, :NE 
XTsGOTOIELSELOChTL-:;. 1Z.3:PRINTUSIMG"## H 
;|:« ■■! iiii S":H, H.;;iPLftV"L>ar"': Ii"S^-ifjTI-rE 
|.ii;=IHi::-- = a:GDTOiELSEl:; 
9:GOTr 1ELSE1 



Frederic FARGEOT presente un exploit canones- 
que. Pour realtser une sauvegarde de la page 
ecran, tapez en mode direct: FSET 650 :CLEAR 
100, puis lancez le programme. EXEC 7582 sauve 
I'ecran, EXEC 7562 le rappeile (renouveler si im- 
perfection). Le debut de zone ecran {& H1DCO) 
est stocke en 7566.7567 et en 7566,7587. Pour 
sauver un second ecran, pokez aux adresses ci- 
dessus la valeur obtenue par (& H1DCO+ 512}. 
Pour une troisieme page, la valeur sera (& 
H1FCO+ 512), etc. La seule limitation ; la taille de 
votre memolre. Et vlan I Deux softs pour Frederii ' 

Listing Canon 

1 fla-"21B0E011C01DlflD5CD:S4E3D123i:S7CFEE2 
C8ieF221BBE011C01DD5CO48E3DH223137C 

2 p*=ft*t"FEE2Cei8F2" :FORI=0TO41 sPOKEI+?5 
62,UflL[ ll B.H"fniDSCA*,I*2fl,2JD:NEXT 



Salutations du vendredi. 



128K 

Amstrad CPC 6128 

ordinateur a unite de disque integree 



Uh wapeuion ioflfie I Entmiragsspar 



FiiBe i notre amrsj* de compatMlitB, !o CPCB13B loncEm* svsc les ta^efe de 93 dam pwtfeesseur! el 

dispose en oute d'une RAM suppfenentue * «Ko pour eipkrialion du sysleme CP/U M aims awtotais 



II PLh : Ls s&me CP/M Plus, appelj k 
Mhique des loglciels CPlVW. les 6IK0 de .... 




■■■■■ TUocke ■■■■■ 



IN PUBIS REPETITK 
Le facteur sonne toujours deux fois 



Film de B. Rafefson (1981) 
avec J. Nicholson et J. 
Lange 




L'ange Olson (pure el radieuse 
J, Lange) est mariee a un gar- 
golier d'au moins dix ans de 
plus quelle. Autant dire qu'au 
niveau de la bagatelle, Is bis- 
trotier ne bisse jamais le trot, 



ye I Un jour, le sherif de la ville 
voisine amene un vagabond 
sortant de prison (Nicholson) 
pour travail I er au restaurant 
afin d'acquitter sa dette en vers 
la justice. II trime comme un 
forcene mais il est souvent de- 
range par la belle qui lui fait 
vite com prendre que cette 
belle energie est par trap gas- 
pillee. Sitot dit "allons equeuter 
la trique-madame", sitot (ait, 
plutSt deux fois qu'une, trala 
yop-la bourn bourn I Nicholson 
nique Olson. 

Leurs effusions etant souvent 
ecourtees par la presence du 
mari, les deux amants decident 
de leliminer en simulant un ac- 
cident de voiture. La police a 
beau enqueter, les deux tour- 



tereaux sont surs de leur coup 
qui n'est pas pret d'etre tire... 
au clair 

Rafelson prenait un risque en 
realisant un remake du film de 
Tay Garnett, tire du roman de 
J. Mac Cain. II a cependant 
reussi son coup, Nicholson est 



lasse pas de 
Lange. Elle est de ces come- 
diennes, qui moins elles sont 
vetues, plus elfes sont belies. 
Le contraire de Bette Davis 
quoi... M'enfin, nobody's per- 
fect- 



Diffusion le 18 a 22h35 sur 





Lundi 16 Septembre 


20h35 


c + 


L'IMPITOYABLE (film sportif combat- 

tant) 

MAUPASSANT (voir article) 

LE COUCOU (film inconnu) 

Vrf 2 

LE JAPON if 2 (voir article) 

ETOILES ET TOILES 

THALASSA 


20h35 
20h35 
20f>35 
22h10 

22h20 
23h00 


FR3 
TF1 
A2 
A2 

7F1 
FR3 




Mardi 


17 Septembre 


20h30 
20h35 

20h35 

20h35 

22h05 


c + 

FR3 
TF1 
A2 

TF1 


L'AFRICAIN (film de De Broca) 

DERNIERE SEANCE (Georges Sidney) 

CE FUT UN BEL ETE rf 2 (redif) 

LA TRAVERSEE DE PARIS (suivez le 

guide) 

ENTRE CIEL ET TERRE (Jerusalem rf 

D 

TCHAO PANTIN (voir 99) 

CINEMA, CINEMAS (LE magazine) 


22h20 
22h25 


A2 


1 


tiercre 


rf# 18 Septembre 


20h30 
20H35 
20h35 
21h00 

21M0 


TF1 
FR3 
A2 
C + 

TF1 


LE CIEL DU FAUBOURG rf 1 
DROLES DE STARS : le rire en boile 
TROU DE MEMOIRE (a oubtier) 
MEURTRES SOUS CONTROLE (recom- 
pense a Avoriaz) 

ENTRE CIEL ET TERRE (Jerusalem rf 
2) 

BUFFON NATURALISTE (film docu) 
DOSSIERS DECAUX : Pierrot le fou 
LE FACTEUR SONNE TOUJOURS 
DEUX FOIS (voir article) 


21hS5 
22h10 

22h35 


FR3 
A2 
C + 




Jeudi 


19 Septembre 


20h35 

20h35 

20h35 
20h50 

22h10 
22h25 
22h35 

1 


c + 

FR3 

A2 
TF1 

C + 
TF1 
FR3 

fendret 


FOG 

HISTOIRE D'UN JOUR (les greves de 

1947) 

SARAH (voir CURIOSITES) 

LES OISEAUX SE CACHENT POUR 

MOURIR rf 2 

EVIL DEAD 

INFO VISION 

TIBET SUR ARROUX 

tfi 20 Septembre 


20h10 
20H3S 
20h35 
20h35 


c + 

A2 

FR3 
TF1 


FOOTBALL (Rennes-Brest) 
L'ORDRE (voir article) 
BRIGADE VERTE rf 6 
LE JEU DE LA VERITE : Gerard Depar- 
dieu 

APOSTROPHE: Les protestants 
VENDREDI (rock in Russia) 
LE REBUS (rebutant) 
LES COMANCHEROS (voir CURIOSI- 
TES) 

LA VIE CRIMINELLE D'ARCHIBALD 
DE LA CRUZ 


21h35 
22h10 
22h20 
22h25 


A2 
FR3 
TF1 

C + 


23h00 


A2 




Samec 


1i 21 Septembre 


20h35 
20h35 
20h35 
22h15 
22h15 
22h30 
22h50 


TF1 
A2 
FR3 
A2 
FR3 
TF1 
C + 


DOM JUAN : Theatre 

DEMAIN, C'EST DIMANCHE 

DISNEY CHANNEL 

LES ENFANTS DU ROCK 

DYNASTIE 

DROIT DE REPONSE 

MARVN (horrible) 


£ 

20h35 
20h35 

20h35 
21h00 
22h35 
22h30 


Hmancl 

A2 
TF1 

FR3 
C + 
A2 
FR3 


ie 22 Septembre 

LE GRAND ECHIQUIER 

L'HOMME QUI VOULUT ETRE ROI 

(voir 99) 

MACADAM (varietes avec Adamo) 

STRESS de J. L. Bertucelii 

LE METIER D'ECRIRE rf 2 

POUR UNE NUIT D'AMOUR (1946) de 

T. Greville avec O. Joyeux et Z. Fiore 



LE DESORDRE 
AMOUREUX 

L'ORDRE 

Serie en 4 episodes de E. 
Perrier, avec I. Brook, P. 
Malet, J. Perrin et Mairesse. 



Vingt dieux la belle serie I Si 
maintenant on ne peut meme 
plus se faire des petits plaisirs 
a ereinterla production televi- 
suelle, oil va-t-on ? 
M'enfin, puisqu'il me taut en- 
censer, enconsons... 




Gilbert Villars (P. Malet), jeune 
moulu du college duquel il esl 
sorti nanti de neuf prix d'excel- 
lence. revient chez son pere 
ou il retrouve sa cousine 
Renee (I. Brook, la fille de 
Peter), dont il est eperdu merit 
amoureux et son frere aine 
Justin (J. Perrin). Tout ne bar- 
gne pas dans I'huile entre les 
deux freres. Justin, medecin, 
bon petit bourgeois, se pre- 
sente a la deputation, alors 
que Gilbert, anarch iste en 
herbe, repousse I'etabli (-veuil- 
lez excuser cette interruption 
momentane de la syntaxe due a 
un arret de travail anarchique 
d'une certaine categorie des 
instructions memoires... nous 
reprenons immGdiatement le fil 
de notre paragraphe-) I'ordre 
etabli. 

Renee ne succombant pas a 
Gilbert, plus hen ne le reiient a 
la cambrousse. II part pour 
Paris, afin de retrouver Gerard 
C... -anarchiste notoire- lequel 
va creer une revue litt&raire 
bete et mechante. Une fois eli- 
mine son seul adversaire, Jus- 
tin peut enfin demander Renee 
en manage qui accepte. 

Pas de chi-chis inutiles dans la 
mise en scene, pas de cha- 
chas superflus dans le scena- 
rio, pas de chow-chows parmi 
les personnages, des come- 
diens tout ce qu'il y a de chou. 
Encore I Encore I Crie le teles- 
pectateur le soir au fond de 
son H. L. M. 

Diffusion to us les vend red is 
du 20 septembre au 11 Oct a 
20h35 sur A2. 



Le zombie de service s'est 
pi ante dans sa grille prece- 
dente. ZOMBIE est remplace 
par LE FRUIT DEFENDU, le 
15 a OOhOO, un film E-RO-TI- 
QUE c lasse X qui se laissera 
croquer aussi le 17 a 0Th45 et 
le 20 a 0"3h00, le tout sur 
Canal + . 



LE MALE PASSANT 
Guy de Maupassant 



Film de M. Drach (1982) avec 
C. Brasseur, J. Carmet, A.M. 
Philippe et S. Signoret. 

Le teint batlu, la mine trisie et 
les yeux blemes, Maupassant 
n'est plus que I'ombre de lui- 
meme. Atteint de syphilis (le 
Syndrome Inherent aux Debats 
Amoureux du XIX erne siecle), 
sans cesse perturbe par les 
parasites (morpions ?) du tout 
Paris, il part s'exiler a Cannes 
pour tenter de finir son roman. 
Afin d'apaiser les crises de 
plus en plus douloureuses, 
Maupassant se met a sniffer 
de I'ether afin d'apaiser le mal. 
Les vapeurs aidant, I'ecrivain 
libidineux se rememore toutes 
ses aventures eroliques avant 
de mourir a I'asiie dans d'al- 
freuses souffrances mental es 
et physiques. 



Maupassant, auteur classique 
par excellence, a ete tres sou- 
vent adapie a la television et 




au cinema. C'etait pas la peine 
de le sortir de son sarcophage 
pour faire du sous-Borowczyk 
ou du super- Hamilton avec les 
souvenirs et les fantasmes de 
I'ecrivain. Malgre des referen- 
ces a rimpressionisme, des 
costumes de la Belle Epoque 
et une composition superbe d 
Brasseur, Drach sacrifie I'histo- 
rique et le litteraire aux petites 
culottes, aux porte-jarretelles 
et autres frou-frous en photo- 
graph iant des jeunes Rites 
dans des tenues parfois a la li- 
mite de I'incandescence. Dom- 
mage pour les cerebraux, 
hounah pour les amateurs de 
trous de serrure. Choisis ton 
camp camarade. 



G3j{ Diffusion le 16 a 20h35 sur 



MOSHI, MOSHI 
Lejapon 



Serie docu me nta ire sur le 
Japon, les nippons, leurs 
nippes, leurs nappes... 

L'aventure humaine, I'exo- 
tisme, la science-fiction, c'est 
bien sur A2. Non pas a 20h35 
avec V comme les autres pro- 
grammes tele vous raffirmeni. 
mais a 22h00 avec cette co- 
production intemationale 
(France- Italie- Belgiq ue-Japon ) . 
L'extra-terrestre , un concept 
occidental , se caracterise par 
une apparence bizarre et un 
comportement incomprehensi- 
ble; le japonais repond 
parfartement a cette definition. 
Non seulement il agit, s'agite 
reagit de maniere et range 
et pousse des cris inarticules 
mais de plus, place au milieu 
d'un e chan til Ion humanofde, on 
le reconnait ai semens a ses lu- 
nettes et a son reflex. 




feuitleton qui alliant un texte ir 
telligent a une ico nog rap hie 
somptueuse nous entrains 
dans I'archipel du Soleil Levant 
a travers 5 periodes decisives 
de son histoire. 

1- L'invasion de Bouddha 

2- Les barbares europeens 

3- L'isoiatronnisme 

4- L'ouverture Meiji 

5- Eire Nippon aujourd'hui 

La serie s'intitule le Reve t 
i'Histoire parce qu'elle illustre 
les chocs culturels successils 
a travers lesquels te peuple je 
3 ponais s'est faconne. Clair, in- 
telligent, fouille et pedagogi- 
que, de la vrai teloche 
culturelfe. 



Diffusion le lundi vers 22h00 
Comment peut-on etre Nip- sur A2 du 9 septembre bu 7 
pon ? Tel est le propos de ce " 



curiosites : 



LA DERNIERE SEANCE : 
Georges Sidney 



La Reine Vierge (1953): la 
vie edifiante d'Elisabeth 1ere. 
Avec une dislribution eclatante 



qui sauve le film de I'anony- 
mat : Jean Simmons, Stewart 
Granger, Deborah Kerr, Char- 
les Laughton, Leo G. Carol! et 
Dawn Adams. 



Show Boat (1951): grandeur 
et decadence d'une chanteuse 
au sang noir dans le Mississipi 
des annees 1890. Pour Ava 



Le meilleur film de la soiree 
est... Le cirque des puces de 
Tex Avery, 5 minutes de delire 
cartoonesque a 22h40. 



LES COMANCHEROS 



Dernier film (1961) de Mi- 
chael Curtlz avec John 
Wayne et Lee Marvin. 

Les Comancheros troquent de 
I'alcool et des armes contre 
des chevaux voles par des 
Comanches. Cutter (J. Wayne) 
el Regret .(S. Whitman), mem- 



bres des Texas- Rangers, vont 
detruire le repairs des trafi- 
quants, sans regrets et sans 
cutters. 

Encore des flics qui confon- 
dent nettoyage et extermina- 
tion, ca pete de tous cotes, les 
cadavres s'amonc^lent, les 
montagnes s'ecroulent et nos 
heros sont toujours debouts. 

Diffusion sur C t le 20 a 




Film de M. Dugowson (1983) 
avec J. Dutronc, G. Lazure, 
H. Bennent et L. I 



Le film dans le film : voila un 
theme classique. Un agent 
d' assurance (Dutronc) vient 
ur un fournage, 




I'^quipe et surtout la come- 
dienne principale (Lazure) qui 
avait disparu. 

L' ambiance etrange qui regne 
dans ce film est principalement 
due a la tres belle photogra- 

Ehie de JF. Robin et aux tres 
eaux decors. Bret, dur pour la 
tete, mais beau pour les yeux. 

Diffusion le 19 a 20h35 sur 



OJJDCHE 



Pas d'edito cette semaine, j'ai deja 
pas assez de place pour les articles 
de la semaine, que meme que j'ai ete 
oblige d'en couper certains, alors vous 
«>yez] CUMl 



VENISE 85 

COCORICO I 

Ah ben ouais I Ah ben ouais ! 
Tu m'etonnes que "cocorico !" apres le 
palmares de la 42eme edition de la 
Mostra de Venise : 

Lion d'or : Sans Toil Ni Loi d'Agnes 
Varda (Murs, Murs. etc..) avec San- 
drine Bonnaire. 



Lion d'argent pour une premiere 
(ou une 2eme) oeuvre : Dust de Ma- 
rion Hansel. 

Prix d'lnterpretation masculine: Ge- 
rard DEPARDIEU pour Police de Mau- 
rice Pialal, film que dont j'vous cause 
cette semaine. 

Pas de Prix d'lnterpretation femi- 
nine : Parce que ces faux-culs de 
membres du jury ont dit que c'etait 
pas la peine de filer un prix ou a Jane 
Birkin. ou a Sandrine Bonaire, vu que 
les films etaient deja primes eux- 
memes. Toutes ces conneries pour 
fourguer des mentions speciaies a 3 
actrices ties connues : Themis Bazaka 
(Grace), Galja Novents (URSS) et 
Sonia Savit (TCH) pour les remercier 



d'etre venues. N'empeche qu'ils au- 
raient pu penser a Marie- Christine 
Barrauli pour Le Pouvoir Du Mai de 
Zanussi, le president du jury- 
Prix Special du jury : Lightship de 
Jerzy Skolimowski (Deep End, Travail 
au Noir, Succes a Tout Prix, etc..) 



Lions d'or speciaux : Pour I'ensem- 
ble de leur carriere et pour les remer- 
cier de coniinuer a tenir depuis si 
longtemps le cinema mondial a Ma- 
noel de OLIVEIRA (Le Soulier De 
Satin) et John HUSTON (L'Honneur 
Des Prizzi, avec Jack Nicholson et 
Kathleen Turner). 



POLICE de Maurice PIALAT 



Avec Gege DEPARDIEU (C'est ni 
son premier role, ni son dernier 
non plus, et son prix d'lnterpreta- 
tion de Venise, n'est que la suite 
d'une tongue serle), Sophie MAR- 
CEAU (Bon, ben, elle est blen.), Ri- 
chard ANCONINA (en avocat meme 
pas vereux. Vu dans Tchao Pantln 
et Paroles et Muslque) et Sandrine 
BONNAIRE (quest venue voir ce 
que devenail son pere putatjf, et 
c'est retrouvee avec un petit rdle). 
1H35. FRA. 





* * # * 


Realisation : 


* * * * 




*** 


Photo: 


* ** 


Divertissement : 


* + * 



normaux, et quand on sait que I'am- 
biance des films de Pialat nest pas 
generalement au beau fixe, on peut 
se rendre compte a quel point le film 
est bien mis en scene, puisque ca ne 
Iran spa rait pas a i'ecran. 
Mais au fur et a mesure, ca devient 
tendre et sensible, pas trop quand 
meme parce qu'il y a toujours les af- 
faires en cours dans ces locaux de 
Dies en carrelage blanc (on dirait des 
bains-douches reconvertis) ou Ton en- 
tend ieurs conversations les plus inti- 
mes (les jeunes flics comparant la 
qualite de leur zonblous en cuir). 
Depardieu est super, mais c'est son 



Sophie Marceau iient ties bien la dis- 
tance en jeune femme mythomane, le 
meme style de idle qu'elle tenait dans 
L'Amour Braquc. 

Au niveau de la realisation, il y a un 
juc qui m'a beaucoup plu. et c'est 
vraiment un "true" cinematogiaphique : 
tres souvent dans le film, on a piein 
de gens qui parient tous en meme 
temps et a ces moments-la. Pialal en 
tretient le brouhaha On ne comprond 
pas ce qu'ils lacontenl, c'csl juste du 
bruit et les dialogues perdent loute 
leur importance, ca me tart penser un 
peu a Godard dans Detective 



Mangin/Depardieu est un inspecteur 
sympa, un peu brutal (il cogne la tete 
des prevenus sur la table quand il 
s'enerve) et pas tres fute-fute, bref 
c'est un mec normal, quoi, le genre a 
qui on offre un pot ou qui sort tous les 
soirs avec ses potes (il est veuf). II est 
branche sur une affaire de dope par 
un type qu'ils ont alpague a Marseille. 
lis arretent le dealer (un tunisien venu 
en France pour se saper !) et sa nana, 
Noria/Marceau, une gauloise. La nana 
est relachee grace aux boos soins de 
Maftre LambenVAnconina, mais le 
dealer, lui, est toujours en taule. Et 
puis petit k petit, Mangin tombe amou- 
reux de Noria et s'arrange pour cou- 
vrir ses conneries, que la famille tuni- 
sienne n'apprecient pas parrjculier- 
ement. 

C'est tres franchouillard comme film. 
Ca m'a etonne, je ne m'attendais pas 
a ca, je pensais que ce serait vache- 
ment intello, n'cherchez pas a 
comprendre, c'est comme ca, une 
idee bete. Ca fait film fait a la bonne 
franquette, entre copains, entre gens 




"devoir national", II serait impensable 
de le voir mauvais. II joue un mec nor- 
mal, coureur de jupons (la pute, la 
commissai re-stag i aire, la gonzesse du 
dealer, tout est bon)qui sort faire le con 
avec son pote Lambert. On y croit dur 
comme fer a son personnage et il n'a 
certainement pas vole son Prix d'lnter- 
pretation a Venise. 



Voila. C'est un film qu'il est tout bien, 
qui, sans etre un film d'action n'est 
pas du tout ennuyeux. 
En tous cas, ca c'est pour les cons 
qui ne veulent voir que des films ame- 
ricains sous pretexte que les Francais 
ne sent pas capables de faire quoique 
ce soil de bon, eh bien une fois de 
plus, le contraire est prouve. 



COMMENT CLAQUER 

UN MILLION DE 
DOLLARS PAR JOUR 

de Walter HILL 



du mois, Monty ne doit plus posseder 
que les fringues qu'il a sur le dos. II 
va lui falloir trouver des tresors d'inge- 



qu'll jouait dans Superman 3 et 
qu'il a passe des moments tres de- 
sagreables avec la justice pour des 
hlstolies de dope) et John CANDY 
(C'est un gros mec delirant, II n'est 
pas encore connu en France, mais 
ca ne va pas larder, vu qu'aux USA, 
II y a 2 films avec lui qui sont sortls 
demierement). 1H40. USA. 




Acteurs : 


* * * 




Realisation : 


* * * 


■■ft'-'" 




* * 




Photo: 


* * 


«ICMW»PRVOB._ 


Divertissement : 


* * * 


ih: iMiii.utH 



Bon. Vous n'allez pas me rofaire ic 
coup des "Zeros de Conduite" Parce 
que ca c'est un film que vous avez 
laisse tomber comme une chiffe molle 
alors que je vous avais exhortes a 
courir aller le voir. Mais comme c'que 
j'oTs ca compte pas et qu'en plus. 
vous etiez en vacances... 
C'est quoi. c'est le titre qui ne vous 
avail pas piu "> Ouais. bon. chuis d'ac- 
cord. ca faisait trop les Branches du 
Bahur ou autres conneries du genre 
Le probleme. voire probleme, cost 
que Les Zeros de Conduite a tene- 
ment mal marche qu'il n'est reste que 
2 semaines a laffiche. le plantage 
total, en somme. Vous n'avez plus 
qu'a esperer que la Fox (le distribu- 
leur) ait la bonne idee de le ressortir 
avec un autre titre d'ici 2 ou 3 ans. 
La seule chose que j'vous demandc. 
c'est de ne pas r6server le meme sort 
a ce film, quoique, de toutes manie- 
res, ca risque moins, etant donne que 
Richard Pryor est le garant d'un mini- 
mum d'entrees pour ce genre de films. 
C'est I'histoire d'un joueur de base- 
ball rate, Monty, qui se retrouve tout 
d'un coup heritter d'une grosse fortune. 
Mais son grand -oncie, le legant, un 
vieux pervers, lui impose Fe deal sui- 
vant; il faut claquer 30 millions de dol- 
lars en 30 jours s'il veut recuperer le 
reste du magot, 300 millions de dol- 
lars. Mais attention, quand on dit cla- 
quer,c'est claquer pour de bon, a la fin 



niostte pour se debarasser de toute 
cette thune. dautant plus que per- 
sonne ne doit raider ni ne dort etre au 
courant de cat arrangemont. a part 
bien sur la maison de courtier qui ge- 
rait les affaires du grand-oncle et dont 
les 2 patrons vont essayer diverses 
methodeyotpour que Pryor n'arrive 
pas a tout depenser on 30 jours C'est 
en effet a eux que reviendiaient les 
300 millions de dollars, s'il n'y arrive 
pas. 

On retrouve dans le scenano des re- 
lents d'un Fauteuil Pour Deux", ce 
qui n'est pas etonnant vu que ce son! 
les memes scenaristes. lis ont em- 
ploye la meme recette. le noir pauvre 
3ui devient subitemenl riche a la suite 
e la lubie de vieux blancs. qui font 
tout ensuite pour que le noir retoume 
dans sa fange initiale. 
Cost bien joue Jaime beaucoup Ri- 
chard Pryor C'est bien difficile de le 
comparer avec Eddio Murphy, puis- 
qu'il est plus vieux et qu'il a une toute 
autre tete. Cela n'empeche pas qu'il 
ait ete le models de Murphy, mais 
quand meme lis sont tres differents. 
Sinon, eh ben, c'est bien fait, on ne 
s'ennuie pas du tout et le moment le 
plus drole a mon gout est celui oil il 
fait sa campagne pour les elections 
municipaies ou Pryor, en millionaire 
excentrique profitant de sa thune, pour 
se presenter a ces elections, exhorte 
son auditoire a ne voter pour per- 



box office 



Nui. a chier. berk. 

Boafl 

Moyen, normal, pas de quoi en bouf- * * 

fer sa casquette. 

Bon. 

Super ! 

Genial I Je bouffe la casquette ! ***** 



ACTEURS REAIJSA. 




* MAISON ET LE MONDE 



CONTES CLANDESTINS 

BIRDV 

TMSTESSE ET BEAUTE 

RUNAWAY 

NUIT PORTE JAHRETELLES 

RETOUR HOHTS-VIVANTS 



34 LEGAFFEUR 



RECHERCHE 

de 



SUSAN, DESESPEREMENT 
Susan SEIDELMAN 



bout de bonne femme tres rigolote, 
vue dans SOB de Blake Edwards), 
Aidan QUINN (Dez, blen.), MA- 
DONNA (la pop-star la plus nue, 
voir Penthouse et Playboy, a part 
ca c'est une tres bonne act rice ), 
Robert JOY (blen lui aussl, vu dans 



(sympa) et Richard HELL (and the 
Voldofds, punk star de la haute 
epoque). 1H43. USA. 

Acteurs : * * * * 

Realisation : * * * 

* * * 



boy friend gangster une paire de bou- 
cles d'oreilles tres convoitees. Le boy- 
friend se fait truckler, mais Susan s'en 
foul Elle craque pour une paire de 
pompes dans un mag' et I'echange 
centre sa veste tape-a-l'oeil que Ro- 
berta rachete immediatement. Nolan, 
I 'assassin du boy-friend, la prand pour 
Susan et essaie de I'alpaguer, et sur- 



Roberta est une jeune femme qui 
s'ennuie avec son man dans son 
New-Jersey, alors elle lit les "cheries" 
dans le journal. Elle suit depuis quel- 
que temps une histoire d'amour par 
PA interposees entre Jim et Susan, 
toutes intjtulees "Recherche Susan 
desesperement". Par le biais de ces 
PA, Jim donne rencard a Susan et 
Roberta, pleine d'envie, se rend au 
rencard afin de voir leur tronche. 
Susan est une nana completement 
bargeot qui vient de piquer a son ex- 




bagarre, Roberta s'evanoui apres un 
choc et a son reveil a perdu sa m§- 
moire et son sac. Elle trouve dans la 
veste un papier de Susan ainsi qsue 
la de de la consigne ou cette demiere 
a laisse ses affaires. Roberta et Dez 
en conctuent logiquemeni qu'elle est 
Susan. 

Suit une serie de quiproquos fous. 
comme vous pouvez vous en douter. 
C'est a dire les 3/4 du film, puisque 
tout ca n'etait que le debut I 
C'est tres drole et c'est mere tambour 
battant. 

Rosanna Arquette est tres marrante, 
essayant de se debattre dans le 
monde bizarroTde dans lequei vit 
Susan, et qui en plus s'en sort tres 
bien (si on oublie son court sejour au 
frais). Madonna est tout aussi 
convaincante dans son role de nana 
Meptomane, ce qui pour certains sera 
peut-etre une surprise. Elle ne chante 
pas dans ce film et que tout les fans 
de Madonna en tant que rock-star ou- 
btient ce cote-la, vu qu'ici on n'en a 
rien a faire. D'abord, moi j'connaissais 
meme pas sa musique avant de voir 
le film, et que meme que j'la trouve 
qu'elle est tres bien comme actrice, 
rial 

Un film avec une peche d'enfer, que 
ca nous manquait depuis un bon bout 
de temps, fait par une femme et avec 2 
femmes comme heroines, ce qui ne 
gate rien, bien au contraire. 




ebdito 



Regardez comme certaines se- 
maines tou! s'enchame bien. Li- 
beratore rend horn mage a Hogo 
Pratt en empalant la tete sangui- 
nolante de Corto Maltese sur un 
pieu. La meme semaine, c'est 
un bison qui subit te meme sort 
sous la plume de Ramaioli. 
Voila une page a" theme bien 
torchee. Pour les autres albums, 
point de theme, mais on ne pent 
pas gagner a tout les coups, 



n'est-ce pas, lecteur aime ? Et 
puis vous avez un nouveau 
Blueberry cette semaine, il ne 
faut tout de meme pas en de- 
mander trap, lecteur exigeant ! 
Remarquez avec vos jolis yeux 
que "Salut la promo" retail son 
apparition apres de longues va- 
cances, pretez-vous au jeu, lec- 
teur pay an 1 1 

Milou 



INDIEN CAMENBERT 



BD-PARAM 



TRAGIQUES DESTINS 

FOLIES ORDIN AIRES 

HISTOiRES A LA CON 

DOCTEUR VENTOUSE 

GLAMOUR BOOK 

CE QUI EST EN HAUT 

CHEZ LUCIEN 

CLARKE ET KUBRICK 

CARAGAL 

HANS 

DESTIN FARCEUR 

REGLEMENT DE CONTES 

LES DEMONS DU MISSOURI 

LOVE TO TEN 

L'OMBRE QUI TUE 

NATHALIE 

JE VEUX RETOURNER A PECS 

GUERRES FROIDES 

SANG D'ARMENIE 

GWEN D'ARMOR 

LES DESSOUS DE LA VILLE 

MARVIN 

LE JEUNE ALBERT 

UGAKI 

COLOMBO 

FONDU ENCHAINE 



VUILLEMIN 

SCHULTHEISS 

CARALI 

BRETECHER 

LIBERATORE 

MOEBIUS 

MARGERIN 

FONT 

PAAPE 

ROSINSKY 

PTILUC 

TAFFIN 

CHARLIER/WILSON 

CRUMB 

DODIER/MAKYO 

DE BOER 

FRANZ 

SCHULTHEISS 

CLAVE/VIDAL 

ROUGE 

MASSE 

ARMSTRONG 

CHALAND 

GIGI 

ALTAN 

DELINX/GODARD 



Tout frangais, Durand le scena- 
riste (presque Dupont), le dessi- 
nateuf Ramaioli (Ah, I'ai'oli, toute 
la Provence), I'editeur (Glenat), 
le papier de bonne qualite, les 




couleurs potables, la couverture 
cartonnee, le prix rai son n able 
(38 francs) et meme le heros : 
"L'indien francais". 



L'indien frangais, gen til blond i net 
binoclard, vit avec les Oglalas et 
fail done partie du peuple Sioux, 
d'oii le litre de la serie. Dans 
cette aventure, il participe avec 
ses freres et deux tuniques 
rouges a la poursuite de quel- 
qu'un ou de quelque chose qui 
arrache la tete des bisons et 
des pumas pour leur boutfer le 
foie et le coeur. Cru I Je dis 
"quelqu'un ou quelque chose" 
pour ne pas vous devoiler la fin 
car, voyez-vous, il y a dans 
cette histoire un suspens. He 
oui, un suspens avec une vieille 
histoire d'indiens et de tuniques 
rouges, ga c'est du bon album 
frangais a la portee de tous, 
sain et pas derangeant. Ca re- 
pose ! Scenar, dialogues, cou- 
leurs sans reproche, pour le 
dessin c'est un peu juste, Ra- 
maioli doit avoir des prablemes 
de digestion, c'est normal avec 
tout cet ail. 

Le chasseur de Solitude, une 
aventure de l'indien frangais 
de Ramaioli/Durand chez G/e- 
nat. 38 foies de puma. 



CORTO GRUYERE 



£P 



Apres les recents "Baston La- 
baffe" et "Rocky Lucke". plagiats 
de Gaston et de Lucky Luke par 
une bande de dessineux fran- 




cais, c'est au tour des Italiens 
de suivre cette curieuse mode 
qui consiste a faire mal ce que 



fait bien un auteur celebre. 
Quand les auteurs copieurs sont 
celeb res, la valeur anecdotique 
du procede peut seduire mais 
dans le cas de "Dedicaced to 
Corto Maltese", 70 % des dessi- 
nateurs italiens sont inconnus 
du public frangais, cet album 
etant deja a moitie interessant, il 
ne lui reste done plus que 30 % 
des 50 % d'interet, soft 15 %. 
L'album coutant 69 frar.^5, vous 
n'en avez done que pour 10 
francs 35, done ne I'achetez 
pas. Mathematique, mon cher 
Corto. 

Ce sidi, pour les collectionneurs, 
quelques precisions : Crepax, Li- 
beratore, Micheluzzi ont fait UN 
dessin (un seul), Moebius bade 
trois pages, Manara pond trois 
autres pages (sans vierges en 
chaleur) et maftre Pratt nous 
gratifie de trois pages en cou- 
leurs de crobards sans inleret. 
C'est Kesselring, I'editeur 
Suisse, qui nous publie ga sur 
du beau papier glace, comme a 
son habitude. Fin du sidi. 

Dedicaced to Corto Maltese 
par un collectif macaroni chez 
Kesselring. 69 parmesans. 




L' IMAGINATION 
EST EN VACANCES 



Je ne comprends pas. II y a un 
type qui a cree des personna- 
ges, un autre qui les a dessines, 
un troisieme qui a fait le scena- 
rio et un quatrieme qui a fail les 
couleurs. Quatre. lis s'y sont mis 
a quatre. 

Et pourtant, c'est le scenario 
de "Les 7 boules de cristal", le 
dessin de "Les 7 boules de 
cristal", les personnages de 
"Les 7 boules de cristal" et les 
couleurs de "Les 7 boules de 
cristal". Si vous achetez, vous 
avez inleret a aimer Tintin, et en 
particulier "Les 7 boules de 
crista!". 

Non, c'est pas vrai. Le dessin 
est aussi pompe sur Hugo Pratt. 



LE MYSTERE GUIGNOL de GUILLOT et WINTZ chez HA- 
CHETTE, 33,30 boules de cristal. 




LOGIQUE 



Marvin, c'est le Mafalda ameri- 
cain. Comme Mafalda etait le 
Snoopy chilien, on reste en 
Amerique, tout va bien. 




7&w Armstrong- 



mm 



sommes I'un des principaux 
pays producteurs de bd. Le sa- 
viez-vous ? Alors, la-bas, ils 
passent leur temps a faire des 
"strips", ces histoires en trois 
images. 

C'est rigolo. Marvin, c'est un 
bebe qui fait hen qu'a faire des 
trues que les bebes font d'habi- 

Exemple : Marvin joue avec une 
calculatrice. Papa arrive et dit 
"Mais ce n'est pas un jouet I" et 
Marvin pense "Ah ! C'est pour 
ga que je n'arrivais pas a avoir 
une partie gratuite I" 
Autre exemple : la grande fille 
dit a la mere "Vous ne devriez 
pas acceder a tous les desirs de 
Marvin. Je redoute les conse- 
quences sur son comporte- 
ment". Et on voit Marvin habille 
en Napoleon. 

II vaut mieux le lire petit a petit, 
sinon on risque une indigestion, 
ciiitions mark jones Mais c'est pas mal. 

Aux Etats-Unis, la bande dessi- MARVIN de TOM ARMS- 
nee n'est pas aussi developpee TRONG chez DISTRIMARK, 35 
qu'en France. Eh oui, nous strips. 




CUL TRISTE 



Ca s'appelle ■ Billie and Betty" n'existe pas et les dialogues 
mais ca aurait aussi bien pu n'ont que peu de rapport avec 
s'appeller 'Tenon et Mortaise", les dessins. A part ga, c'est du 
"Bite et Trou" ou "Du moment cul, rien que du cul, mais du 
qu'il y a du cul chirurgical, les sale et du triste, du porno, du 
gros cons et les beaufs vont maso, du sado, du scato, du 
pedo et du geronto. Excitant et 
bandant comme une operation 
chirurgicale. Si vous aimez ga, 
achetez plutot un bon livre 
porno dans votre sex-shop habt- 



GOOD LORD, GOOD LORD, 
MAIS C'EST UN 
BLUEBERRY S~mf> 



BE U ARK 



L'album est pas mal, le litre 
n'est la que pour faire un jeu de 
mote avec le nom de lauteur. 
Rigolo, non? J'ai trouve ga tout 
seul, et je suis bien content. 
C'est le 19eme album de la 
serie des Gorilles, qui dure 
depuis un certain temps deja. 
On ne le redira jamais assez, 
Cauvin est I'un des scenaristes- 
piliers-vedettes de Spirou, parce 
que son humour est a la fois 
gentil, instructif et pas mediant, 
bien qu'agreable quoique syrn- 
pathique. Vous i'avez compris: 
c'est pas du vitriol. C'est Ires 
bien pour se rappeler du bon 
vieux temps oCi on etait m&me 
et ou on avait du mal a 
comprendre des mots du style 
"bfle s ou "vagin". Done, il n'y en 
a pas. Done, c'est facile a lire. 
Ecco. 




EN PISTE LES GORILLES de 
BERCK et CAUVIN chez 
DUPUIS 33 ans que ca dure. 




C'est le 25eme Blueberry, C'est 
le 4eme Blueberry. Non, je ne 
suis pas malade, cet album est 
effectivement le 25eme paru et 




au 4eme album de la serie, 
juste apres "Un yankee nomme 
Blueberry" et "Cavalier bleu". 
Bloody hell, c'est du Blueberry, 
les dessins de Wilson et les dia- 
logues de Charlier vous empor- 
tent dans I'Ouest, le vrai. Damn 
it, des renegats. Good Lord, des 
decors superbes. Hell, des ba- 
tailles rangees. Damn ft, des ex- 
plosions. Good Lord, des morts 
partout. Damn it, un scenario 
passionnant. Hell, sauf la fin en 
queue de poisson. Damn it, 
poisson texan, of course. Damn 
it, ca gonfle toutes ces Damn it 
d'onomatopees ricaines de 
Good lord de hell. Damn it, mais 
c'est. Damn it, du Blue, damn it, 
berry. Comment dirais-je ?.... 
Damn it ! 



Les demons du Missouri, une 
aventure de Blueberry, scena- 
rio et dialogues de Jean-Mi- 
chel Charlier, dessins de 
Colin Wilson, mise en cou- 
leurs de Janet Gale. 35 batons 
de dynamite en travers la 
gueule. Damn it. 




personnel : Alan 
Davis, I'auteur de cette merde, 
ne s'appelle pas Alan Davis, il 
dessinait dans les annees 77-78 
dans un journal bien connu un 
autre personnage, sans rapport 
avec ces horreurs et il ferait 
bien de s'y remettre, on achete- 
rait bien des planches a I'hebdo. 
Fin du message personnel, ne 
comptez pas sur moi pour vous 
donner le vrai nom d'Alan Davis, 
je critique les albums, pas la vie 
privee des auteurs, je ne suis 
pas Manoeuvre. 

Billie and Betty d'Alan Davis 
chez CAP. 45 remedes contre 
I'amour. 



GRANDE VENTE DIRECTE 
D'USINE AUX PARTICULIERS 




micronique hector 

61. roe remand Laguide, 91100 CORBEIL-ESSONNES 

TO. (G) 08)3.35.58 « 300 "*'«* de la gare de villabei 

VALABLE JUSQU'AU 
31 DECEMBRE 1985 



PRIX PUBLIC 1290 F 
UNIQUE 



■ CE MODELE COMPACT EN 16K 
avec 3 logiciels - Basic Resident - 2 
poignees de jeux - Manuels. Le lout 
superbemenl presenie dans un joii 

POUR VOS CADEAUX 
STOCK UMfTE - UVRAISON SOUS 
48 H. 



Pioiitez des PRIX 



micro-ordinateurs 



. HECTOR LOISIRS PLUS - 48 K 

+ moniteur N/B interface 
PRIX PUBLIC 3190 F 

. HECTOR LOISIRS PLUS - 48 K 

+ moniteur couleur CM 14-36 cm 
PRIX PUBLIC 4490 F 

> HECTOR HRX 64 K FORTH et BASIC 

+ moniteur couleur CM 14-36 cm 
PRIX PUBLIC 5490 F 



hector # 



a cores™. 

Egalentent a Paris 

dans Id MAISuN D'HECTOR 

14, rue de Id nolle Regnault 

75011 PARIS. Tel. : (I) 3563130 

Metro : Voltaire. Philippe-Augusle, Gharonne 

Dei Diiinaif u;s famiiiam de Iris bante qnalhi a its 

PRIX CONSTBUGTEUR 



BON DE C0MMAMDE 

UVRAtSON IMMEDIATE PAR SERVICE EXPRESS 

a hector/ 



Servion commnndus 
B.P. 91 - 91100 COBBEIl ESSO 



i mn hh lain raan 



■r . w <w i<v«r > i v *iT,ii \i«i 

MB 111 ■! ft 21 k' ■ I I ■ I »' ■■ 






pour la micro-informatique. 







MCla. : AI>P1 

LASEH 3000. 

OLetlesaidfliaHw 
OHM : OfilC 1 E' 
Materiel en uen 





3i vous n'optez pas pour la solution moniteur, vous 
urez souvent bESOin d'une interface pour tranche 
/otre ordinateur sur tel ou lei televiseur. Les inter 
aces EUREKA sont susceptibles de resoudre la plu 
]art de uos problemes de branchements de micro 
jrilinaleurs. avec la meilleure qualite d'image pos 
ible dans ces conditions. 






Interface 


Entree 


Sortie 


PiU 






P6010 


Pentel 


UHF Cauleurs 


495 F. 






P6015 


Perilel 
Vide o Secant 


UHF Noii el Blanc 
UHF Couleurs 


295 F. 






P6020 


Video PAL 


Petite! 


495 F 






P6030 


Video PAL 


Video Socam 


790 F. 

















dfetnr 

Qi« 


ommander l» malaria 

OswriQIion 


•*-* 




prb 


CHah. 


™- 
























Personne n'a 
encore trouve! 



code d'EUBEKA... voile t 

enrages I 

Persnnna n'ayont trouve 
bonno reponse au 31 He 
date de cloture 

proroge Juaqu'o la fir 

Ji-u rfu Bois dana TILT, lavs Lick d'or en Angleterre, EUREKA 
est vralnent LE jeu h avoir aoaaluaent pour Cnmnndnre 64 au 

Bon de Comande a retourner a: 

EUREKA IHFtMWTlllUE 39 Rue Victor rlaaae. 75009 PARIS 

M 

Adresse 

Code Ville 

dtSsire recevoir la cassette du jeu 
EUREKA pour : ,—. 

Commodore 64 I I Spectrum. I I 

Ci-joint 250 Francs en reglement de ma 
commande (Franco de port) 




mmsm 

- TOUS LES MINI ET MICRO ORDINATEURS 
A PRIX PLANCHES 

- specialiste AMSTRAD et MSX. 

- Tous logiciels FRANCAIS et IMPORT. 

- INITIATION GRATUtTE. 

- Vente aux REVENDEURS. 

MINI ET MICRO ORDINATEURS 

11 me de Lalande (angle 41 couraPaateur) 



BORDEAUX 



TtbSe/31. 45.82 
56/91.04.64. 



BLANC BERNARD 

1NFORMATIQUE BUREA UTIQUE LYON 

AMSTRAD - SINCLAIR - ORIC 

SHARP - THOMSON - SANYO 

LEANORD - LOCYSTEM 



9, me Salomon Reinach. 69007 Lyon 
Tel. : (7) 872.25.48 (pres facultes) 

ASSISTANCE TECHNIQUE - LOCICIEL - FORMATION 



Benoite PICAUD 



Marline CHEVALIER 



CAHALt 



RCS3BW21 



CACNEZ UNE CROISIERE 
SUR LE NIL 



AVEC NO MAN'S LAND 



SICOB BOUTIQUE 
STAND 150 

23 au 28 Septembre 



innELEC 



ooooc 

Dangereusement Votre %- 




u cette rentree, mes entente ? Milou est comple- 
tement sature, II craule sous des tonnes de bd I 
Qu'est-ce qu'fl va avoir, cette semaine, le bon lecteur, avec 
son nouveau Blueberry qu'il va commander en nous don- 
nant son bel argent ? II va avoir un poster en couleurs signs 
Glraud ! Le vrai, E'authentique, le seui Giraud ! On I'applau- 
dttl r 

Hals II y a mleux ! Parmi les 24 albums deja par us, vous 
pouvez en commander 2. Et la, pal ! Un autre poster. Vous 
en contmandez 4 ? Et encore un ! Tous dHferents, en plus I 
Si vous commands; les 24 plus le dernier, vous aurez une 
gnffique codec' de 13 posters. 

itits sous ? Combien on donne de pet its sous ? On 

5 francs + 6 francs de frais de pore par album. Et le 
poster, gratos, au lieu de 30 balles, quand memo ! Et en 
plus, a partjr de 4 albums, le pore est sain I Pardon, le port 
est gratuit ! 



mag n if I. 
Et les p 



Vous detestez volte libraire ? 
Bravo ! SALUT LA PROMO esl 
faite pour vous. Chaque se- 
maine les plus malins d' en ire 
vous pourront profiler d'une oftre 
mais aussi nous 
commander tous les albums de 
bandes dessinees de leur choix. 
Comment faire ? Prenez les prix 
de la liste ci-conlre. ajoutez 6 
francs de port par album et ren- 
voyez-nous le bulletin 
avec votre paiement. Attention, 
a partir de 4 albums, le port est 
gratuit. 



TRAGIQUES DESTINS 49,00 

F0LIE5 ORDINAIRES 69,00 

HISTOiRES A LA CON 46,00 

DOCTEUR VENTOUSE 45,00 

GLAMOUR BOOK LIBERATORE 215,00 

CE QUI EST EN HAUT 35,00 

CHEZ LUCIEN 30,00 

CLARKE ET KUBRICK 38,00 

CARAGAL 33,50 

HANS 33,50 

DESTIN FARCEUR 64,00 

REGLEMENT DE CONTES 34,00 



LOVE TO TEN 


95,00 


L'OMBRE QUI TUE 


33,00 


NATHALIE 


40,00 


JE VEUX RETOURNER A PECS 


33,50 


GUERRES FROIDES 


49,00 


SANG D'ARMENIE 


56,00 


GWEN D'ARMOR 


38,00 


LE MYSTERE GUIGNOL 


33,30 


L'INDIEN FRANCAIS 


38,00 


DEDICATED TO CORTO MALTESE 


69,00 


BILLIE AND BETTY 


45,00 


EN PISTE LES GORILLES 


33,00 



-Bon de commande . 



QEnvoyez-moi le nouveau Blueberry qui porte le litre enchanteuf i 
de 'Les demons du Missouri". N'oubliez pas mon poster gratos. ' 
Magnez-vous le train. Je casque 35 balles plus les 6 balles des j 

Suteuteu. , 

Envoyez-moi ... albums dB Blueberry deja parus. Oubliez pas, ' 
etc, etc. Et je joins ... x 35 francs + le port si il y en a moins de J 
4 (attention, le tome 15 vaul 46 francs, parce qu'il est mieux que i 
les autres). 

QJe voudrais un/des albums de la liste ci-contre. Je paie rubis ■ 
sur I'ongle mais vous ne m'aurez plus. 
QEh ben non, finalement, je ne veux rten. Par contre, s 
menvoyiez votre luxueux catalogue, ca me ferait ires chaud ' 
dans la moellee " 



Code poslal i mile . 




HIPPO JOYST 

C'est japonais, c'est un des meilleurs et des plus 
costauds que I'on connait : trois boutons de tir, 
une bonne prise en mains et quatre ventouses 
pour le coiler definitivement sur la table de la 
salle a manger (super pratique pour les repas !). 
Prise standard pour Amstrad, Atari, Commodore 
64, MSX, Vic 20. Compatible avec les interfaces 
d'Oric et de Spectrum. Pour Apple, Thomson et 
Texas, tintin : ga ne marche pas ou alors II fau- 
dra bidouitler ! 
Ah, au fait, c'est 120 balles... 
C'est bon, c'est pas trop cher ? Envoyez vos 
sous apres avoir rempli le bon de commande ci- 
joint. Le ministre du commerce exterieur du 
Japon vous remercie bien bas. 




Bon de commande a decouper et a renvoyer a 

SHIFT EDITIONS, 160, rue Legendre 

75017 PARIS. 

Norn 



Pr&nom... 



PU=120F...x...= 

frais d'envoi = 

cheque joint: TOTAL = 



...F 
+15 F 

„„F 



HEBDOGICIEL SOFTWARE 

Le logiciel a sa juste valeur 

Six logiciels francais de qualite par cassette et un prix raisonnable : des produits signes SHIFT EDITIONS ! 




njeud'aventure : cava Six jeux u'aventure, bonjour osnuit:, Ul. inches ! Vousal- 

iratourexplorateur.espion,egyptologi.<? ^.osinuii.iiiie.^uper-he- 

lucSlebredocteurParanaud. Sivousamvi.'/ji;t)i)„i(iHress'xcas- 

problemes de sante et sans troubles mt'iil;nn. vous deviendrez 

jrands maTtres mondiaux dujeu iThvohI jre' Unm 

craquer pour 120 Irancs. 

Voire One utilise lelangagemachinepourreflechiretvo 

pasplusfacile:cinqetages,destrappespartoutet 
;s ! Dans "Oil leak' 1 , vous devez reparer une voitureau beau mili 
aques d'huile. Lesgouffres, les ravins el les precipices de "Pon; 
rendre fou I Le "Parsec" fonce a toufe vitesse et la "Guerre 
tout simplement le premier grand Wargame pour Oric. 120 



"Dork crystal" i 
des plus beaux e 

cuperer des fragments decristal dans 
le labyrinthe qui est le lieu a la mode 



ssautresjeitxsonttoul. 






carles, une centrale nui 
sion perilteuse" qui vou 
dans une jungle hostile < 
tueux tableaux. 120 francs 
en basic etendu. 



transport era 



BASIC ETENDU 






SPECTRUM N-1 




► 2ST 



Desjeux d'arcadea gogo : changez le 
cours del'histoirea Pearl Harbour, gui- 
dez Al 'bert et Kong dansleurpyramide 
favorite, jouez A un jeu de balle en- 
tierement nouveau, constnjisez 
d'enormes muts avec voire gme de 
eretre 










n buvez. plus 
desamorcez facilement les bo 
de "Caramba" ! Six super-pror 
mes pour 120 francs. 

Deux jeux d'arcade: t 
un coumgwix pompie 
dunemotodecourselonctionnantai 
i .u i.,.;.- machine. Viennent ensuitela 
(Cflemon avec "Puzzle" el la stategie 
rivHT 'Minou!" oil vous pourrez organi- 
ser des competitions jusqu'a 5 

dor", uii lahuleux jeu graphique en 3 
dimensions 6 super-pro grammes 
pour 120 francs. 




dans votre M05 et quand 

jeuxsontmultiplesetdouz 

sagerez quelques nui Is blanches 
d'Othello, de Poker, de Memo 7... Des 
que Vimmobilite vous paraitra insup- 
portable, partez pour lespace pro- 
fond (Worp)ou retrouvez vos amis (fr- 
chier d'adresse). Vous verrez. vous 

«n'en croirezpas plus vos yeux que vo- 
ire M0S n'en croira ses |eux I 

•*•*••*• 

BON DE COMMANDE A EN- 
VOYEH A SHIFT EDITIONS, 
160, rue Legendre 75017 



^ PARIS. 

}t N D m/n r6nDm 
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"jL. ORIC N" 4 
^ ORIC N" 5 


D 


120F. 


□ 


120 R 


^. SPECTRUM N D 
~ TEXAS N D 4 


□ 


120 F. 


D 


120F. 


^ ZX 81 N° 1 
^ M05N°1 


D 




□ 


150 F. 



- HEGCEMEriT JOINT: ,0OF 



DEUX SUPER-CONCOURS PERMANENTS 

20 000 francs de prix au MEILLEUR LOGICIEL du MOIS et un VOYAGE pour 2 
personnes en CALIFORNIE au meiileur logiciel du TRIMESTRE. 



Un concours de plus ! 
Rien de bien original dans 
cette lormule, pourtant nous 
essayons de fairs que I que 
chose de different : nous or- 
ganfsons un concours perma- 
nent tous les mols et tons les 
trlmestres ! Et avec des prix 
dfgnes des programmes que 
vous allez nous envoyer ! 
De plus, ce seront les lecteurs 
eux-memes qui voteront pour 
leurs programmes p refers s 
sur la grille recapitulative 
mensuetle. 

Pas de Jury, pas de decision 
arbitraire, HEBDOGICIEL n'in- 
tervenant que dans le choix 
des programmes qui devront 
etre ORIGINAUX et FRAN- 
CAIS. Si votre programme 
n'est pas tout a fait au point, 
un de nos special istes vous 
dlra comment I'ameliorer pour 
nous le proposer a nouveau. 
Pour participer, il vous suffit 
de nous envoyer vos pro- 
grammes accompagnes du 
bon de participation ainsi que 
de toutes les explications ne- 



cessalres a I'utiHsation de ce 
programme. 
Bonne chance ! 
Reglement : 

ART.1 : HEBDOGICIEL organise 
de facon mensuelle et Irimes- 
trielle un concours dote de prix 
recompensant le meiileur pro- 
gramme du mois et du trimestre. 
ART.2 : Ce concours est ouveri 
a tout auteur de logiciel quel 
que soil le materiel sur lequel il 
est realise. L'envoi d'un logiciel 
en cassette ou disquette accom- 
pagne d'un bon de participation 
decoupe dans HEBDOGICIEL 
constitue lade de candidalure. 
ART.3 : La redaction d'HEBDO- 
GICIEL se reserve le droit de 
selection ner sur la base de la 
qualite et de I'originalite les logi- 
ciels qui sont publies dans le 
journal. 

ART.4 : Ce son! les lecleurs qui, 
par leur vote, determinent les 
meilleurs logiciels mensuel et tri- 



BON DE PARTICIPATION 



ture du concours mensuei. 
ART.6 : Le prix alloue pour le 
concours trimestriel sera remis 
au plus lard un mois apres la 
cloture du concours trimestriel. 
ART.7 : Le present reglement a 
ete depose chez Maftre Jauna- 
tre, 1 rue des Halles, 75001 
Paris. 

ART.8 : HEBDOGICIEL se re- 
serve le droit d'interrompre a 
tout moment le present 
concours en avisani les lecteurs 
un mois avant. 

ART.9 : La participation au 
concours entraine I'acceptation 
par les concurrents du present 
reglement. 



Sera declare gag nan t le pro- 
gramme qui aura obtenu le 
plus fort pourcentage de vote 
par rapport a la total ite des 
programmes recus pour un 
meme ordinateur. 
Ainsi, pas de favoritisme pour 
les ordlnateurs plus puissants 



ou tres diffuses. 



Pre no m - 

Age : Profession : 

Adresse . 

N° telephone : 

Nom du programme : 

Norn du materiel utilise : 

declare etre I'auteur de ce programme qui n'esl ni une imitation ni une 
copie d'un programme existant. Ce piogrisrrnne resle ma propriete et 
j'autorise HEBDOGICIEL a le publier. La remuneration pour les pages 
publiees sera de 1000 francs par page (un programme n'occupant pas 
une page entiere sera remunere au prorata de la surface occupee) 



Le programme doit etre expedie sur support magnetique (cassette ou 
disquette) accompagne dun descrip tif detail I e du materie l utilise, 
d'une notice d'utilisation du programme. Les supports des program- 
mes publies sont conse rves^ n : oubliez done pas d'en faire une copie. 



Pft* 
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HORRIBLE : 



ILS TAPENT LES TOUCHES DE 

LEURS ORDINATEURS DEVANT 

LEURS FEMMES 

ET LEURS ENFANTS 



Sans se connaitre, a des centai- 
nes de kilometres I'un de ('autre, 
ils ont tous les deux franchi les 
limites de la cruaute et du ma- 
cabre et, triste ironie du sort, ils 
font cette semaine la une de 



Imagines- vous Eric Lechat, 
meme pas 20 ans, penche sur 
son Amstrad et lui assenant de 
vioients coups de doigts sur les 
touches. Sa famille medusee as- 
siste a la scene sans rien dire, 
apeuree et servile. Deja, il y a 
quelques semaines, les signes 



avant-coureurs du drame 
avaient ete remarques par nos 
journalistes : Eric gagnait 20.000 
francs dans un concours de tor- 
ture organise par un journal in- 
terdit et specialise dans ces in- 
quielantes pratiques. 

Aujourd'hui, c'est I 'escalade, 
Eric Lechat gagne un voyage 
aux Etats-Unis pour deux per- 
sonnes, le journal interdit va 
meme jusqu'a organiser des vi- 
siles des camps de la Silicon 
Valley oil sont perpetres les mas- 
sacres d'ordinateurs qui scanda- 



lisent le monde. Mais que tait 
done James Bond ? 
Remy Ring en bach est plus 
pose, il a depasse la trentaine et 
travaille dans une banque. Ca 
ne I'empeche pas, la nuit, de 
martyriser froidement son Apple, 
allant jusqu'a le programmer en 
langage machine. Oui, vous 
avez bien lu, en langage ma- 
chine ! Sinistra cruaute qui lui 
rapporte deux millions d'ai 
francs. 



Mais que fait Badinter ? 




DEMANDEZ LE PROGRAMME. 



Achetez vos logiciels les yeux fermes, nous les avons testes pour vous ! 

Tous les beaux, tous les bons logiciels se retrouvent ici. lis y viennent sans la pub, uniquement pour ce qu'ils ont dans le ventre. Les prix s'approchent du plus bas : normal, nous preferons ramener le 
soft a sa plus juste valeur. Du coup un bon programme trop cher ne figurera pas dans la page. Les autres sont classes par ardre de preference, pas par rapport qualite-prix, achetez si vous voulez ! 



De la musique plein les oreilles 
et des couleurs plein les yeux, 
voita ce qui vous attend des 




DIGITALM1X 
que vous aurez decide d'aider 



Ran kin' Rodney a vaincre Dis- 
cords a dans un duel long de 
vingt tableaux. Rankin' Rod- 
ney, un nom qui restera indefi- 
niment lie dans votre esprit a 
celui de musique, si vous n'ou- 
bliez pas de relayer le son de 
votre micro par votre chafne 
hifi. Alliant la qualite de pre- 
sentation a f'originalite totale 
du scenario, ce jeu d'arcade 
devrait emporter votre coeur 
au septieme ciel des ludoma- 



En voila du jeu d'aventure de 
conception francaise qu'il est 
bel et bon. En plein dans I'ac- 
tualite sud-americaine, vous 
devrez accomplir au moins 
I 'equivalent des douze travaux 
d'Hercule pour venir a bout du 
scenario machiavelique concu 
par la seule et unique temme 
qui aime les ordinateurs. Du 




panard grandeur nature : ce 
soft cause francais (entin pres- 
que) et musicionne sur deux 
voies I Pourtant il tourne sur 
Apple... 



MANDRAGORE 

Le premier jeu de role bien de 



cheu nous qui ne ressemble 
pas a un ramassis de fonds de 
tirairs americains I Apres quel- 
ques mois difficiles pour ac- 
complir la prog ram ma lion en 
iangage machine, les auteurs 
proposent enfin un produit ex- 



MANDKACiORE 



.»!_ 



U^Sj^KK. 



qualite de ses graphismes, 
partois animes. A pratique.' en 
groups pour profiler au maxi- 
mum de I'ambiance mystico- 
moyennageuse qui plane sur 
ce soft. 



ALIEN 8 



Un pur produit df 
arcade risque de s'emparer 
des octets de votre micro 
comme des neurones de votre 
cerveau. Alien 8, supreme de- 
veloppement de la technologic 
d 'outre- e space assume cou ra- 
ge u semen t la maintenance 
d'un vaisseau vieux de millions 
d'annees. Charge d'assurer la 
perenite d'une race en voie 
d 'extinction, il parcourt coura- 
geusement les galaxies a la 
recherche d'une planete sus- 
ceptible d'accueillir les derniers 
de ses maitres. Aidez-le a ac- 
complir le menage et a reacti- 
ver les cercueils cryogeniques 



apres le passage devastates 
de pirates intergalactiques. 




Une tres belle realisation ou la 
troisieme dimension devient 
palpable, peuplee de ses 
inombrables pieges. 



TITRE et PLACE 



SPECTRUM 



SUPPORTet PRIX GRAPHISME et 
CATEGORIE INTERET 



1 DARK STAR 


K7 


AJ 


2 SHADOWFIRE 


K7 


AV 


3 ALIEN 8 


K7 


A JR 


4 STARION 


K7 


AJV 


5 SPY HUNTER 


K7 


AJ 


6 FRANK BRUNO'S BOXING 


K7 


A J 


7 CINQ SUR CINQ 


K7 


FJ 


B BRUCE LEE 


K7 




9 NODES OF YESOD 


K7 


F J 


10ZAXXON 




AJ 


11 MEGAHITS 


K7 


AJ 


12 MATCH POINT 


K7 


AJM 


13 SABRE WULF 


K7 


AJ 


14 UNDERWURLDE 


K7 




15 BEACH HEAD 


K7 




16 LORDS OF MIDNIGHT 


K7 




17 ATIC ATAC 


K7 




18 PSYTRON 


K7 


ARJ 






AVR 


20 PAINTING JOE 


K7 


FJ 


21 LOMBRIX 


K7 


FJ 


22 VOX 


K7 


FL 












FJR 


25 MANOIR Dr GENIUS 


K7 


FVR 


AMSTRAD 






1 SORCERY 


K7 


AJM 


2JAMMIN' 






3 ALIEN 8 




AJRM 


4 NODES OF YESOD 




AJM 


5DEFENDORDIE 


K7 


AJ 


6 FIGHTER PILOT 






7 FRANK BRUNO'S BOXING 




AJ 


8 KONG STRIKES BACK 




AJM 


S MACADAM BUMPER 




F J 


10 CONFUSION 




AJRM 


11 THE WAY OF EXPLODING FIST 




AJM 


12 SUPER PIPELINE II 


K7 


AJM 












FV 


15 SURVIVOR 




AJ 


16 HUNCHBACK II 




AJM 


17BATAILLE POUR MIDWAY 




FJM 


18 HOUSE OF USHER 




AV 


19 FOREST AT WORLD'S END 




AV 


20 MESSAGE FROM ANDROMEDA 


K7 


AV 


THOMSON 






1FOX 






2 MANDRAGORE 


K7' 


FV 


3 LES DIEUXDU STADE 


K7 


FJM 


4AIGLED'OR 




FV 


6 FBI 






6 INVASION 






7AIRBUS 






8 ELIMINATOR 






PULSAR II 






10STANLEYMO5 


K7 




1 1 SPACE SHUTTLE MOS 


K7 




12VOXM05 






13YETI 


K7 


JM 



ORIC 

1 TROIS D FONGUS K7 
2|MEURTRE A GRANDE VITESSE K7 

3AIGLED'OR K7 

4 MR WIMPY K7 

5 DOGGY K7 

6 SUPER JEEP K7 
BHOBBIT K7 
9COBRAPINBALL K7 

10FRELON K7 

11 DIAMANT DE L'lLE MAUDITE K7 

12 BIG BASTON K7 

13 PSYCHIATRIC K7 
14TENDREPOULET K7 

15 LANCELOT K7 
16ULTIMAZONE K7 
17MISSION DELTA K7 

COMMODORE 

1 REALM OF IMPOSSIBILITY 

2 LODE RUNNER 

3 LODE RUNNER CHAMPIONSHIP 

4 BOULDER DASH 
'5 THE DAMBUSTERS 

6 ELIDON 

7 ELITE 

6 MANDRAGORE 
9 SHADOWFIRE 

10 WEB DIMENSION 
11GHETTOBLASTER 

12 MASTER OF THE LAMPS 

13 ENTOMBED 

14 UP'N DOWN 
15SPYVSSPY 

16 THE WAY OF EXPLODING FIST 
17CONAN 

18 SEVEN CITIES OF GOLD 

19 CONFUSION 

20 CINQ SUR CINQ 

21 MEGAHITS 

22 TOURNAMENT TENNIS 

23 RAID OVER MOSCOW 
24SUMMERGAMES 

25 BATAILLE POUR MIDWAY 

26 BRUCE LEE - 
27SPELUNKER 
28 WHISTLERS BROTHER 

29 DALLAS QUEST 

30 THE HOBBIT 



DISK K7 
MODULE K7 
DISK 



DISK 

K7 

DISK 2K7 
DISK K.7 
DISK K7 
DISK 
DISK 
DISK 
K7 



AVM 1 

AJM : 

AJM 

AJM 

ARM 

AJRM 

AJV 

FV 

AV 

FJRM 

AJM 

FJRM 

AJVM 

AJM 

AJM 

AJM 

AJ 

AVM 

AJRM 

FJM 

FJM 

AJM 

AJM 

AJM 

FJRM 

AJM 

AJM 

AJM 

AVR 

AVR 



135/95 * * * 



245/165 J^iSi 

150/115 * * * 

145/95 * * * * 

275 * * * + 

275 * * * * * 



APPLE 

1 CONAN 

2 MEME LES POMMES DE TERRE 

3 LODE RUNNER CHAMPIONSHIP 

4 BRUCE LEE 

5 SKYFOX 

6 CRIME DU PARKING 

7 PARANOIAK 

8 DALLAS QUEST 
9EPIDEMIE 

10 OPERATION MERCURY 

11 BC'S QUEST FOR TIRES 

12 LUNAR LEEPER 
13AQUATRON 
14JAW BREAKER II 

15 ONE-ON-ONE 

16 AZTEC 

17MASKOFTHESUN 
18PINBALL CONSTRUCTION 
19CHOPLIFTER 

20 HARD HAT MACK 



DISK 
DISK 
DISK 
DISK 
DISK 
DISK 
DISK 
DISK 
DISK 
DISK 
DISK 
DISK 
DISK 
DISK 
DISK 
DISK 
DISK 
DISK 
DISK 
DISK 



AJM 

AJM 

AJM 

FV 

FVR 

AVR 

FVR 

FVM 



AJ 

AJ 

ARM 

AJM 

AVR 

AJM 

AJM 

AJM 



t + * * * 
lr * * 
t * * * 



BON DE COMMANDE A DECOUPER OU RECOPIER: SHIFT EDITIONS, 160, rue Legendre 75017 PARIS 

Nom/Prenom date de la commands : 

Adresse Lea cheques recus ne seront en aucun caa ancaisses avant la llvralson dea 

Ville Code postal logiciels com mandes. Ch&que renvoyeen cas de rupture de stock. 



LOGICIELS 


Ordinateurs 


Prix 


ate 


Montant 













Participation aux Itals de port en recommends 
REDUCTION 10 % SPECIAL ABONNES A DEDUIRE 
N° ABONNE (obligatoire) I I I I I I 

MONTANT a payer [ 



si vous etes ABONNES 

deduisez 

VOUS-MEMES 

vos 





da remise 
bon d ? commande 




VENDS 70 a 80 logiciels sur K7 
de 50 a 100F piece. Philippe au 
(1) 352 40 11. Cherche rensei- 
gnements sur CPC 664. 

ECHANGE logiciels pour Ams- 
trad CPC 464, jeux et utilitaires, 
litre centre titre. Faire proposi- 
tion a J.P. WOJACZEK, 10 allee 
des peupliers, 78390 Bois 
d'Arcy. 

ECHANGE tous logiciels pour 



Claude LE MOULLEC. 83 rue 
Joliot Curie, 22420 Piouaret, 
Tel : (96) 38 94 24. 

VENDS Amstrad CPC 464 cou- 
teur, garantie 10 mois, 4000F, 
chaFne Hlfi Technics avec son 
meuble, 5000F. M. GAZELLE au 
(8)356 29 49 apres 18H. 

CHERCHE pour Amstrad, livres 
Micro application, Basic au bout 
des doigts el Graph is me et son 
du CPC 464. Marc MANCEAU 
"Chasse llevre" Crottet, 01290 
Pont de Veyle. 

CHERCHE possesseur d' Ams- 
trad pour echange de logiciels 
de jeux et utilitaires, trues et as- 
tuces. Richard Christian, 31 
Allee des Abeilles, Les blancs 
manteaux, 91170 Viry-Chatillon. 
Tel : 921 14 28.N0Z.Je . Ou est 
le nom ? Ou est le pr6nom ? 
Wouat ize ze qwestionne ? Le 
premier qui trouve gagne 1 an- 
nonce gratuite I 



CHERCHE possesseurs Ams- 
trad pour echange de logiciels, 
didactiels et progiciels (i'en pos- 
sede environ 50). Philippe 
ZIMOL, 1 impasse Fragonard, 
54580 Auboue. Tel : (8) 222 36 
91. 

CHERCHE possesseur d'Ams- 
trad pour echanger, vendre ou 
actieter des logiciels (tout 
genre). Possede actuellement 
SO jeux. Tel : (50) 98 40 30. 
Thierry CAUX, 431 rue des 
fleurs, 74300 Clures. 

VENDS Amstrad CPC 464 cou- 
leur, 4 K7 (Ghostbuster, Flight 
path 737,...), joystick, 10 K7 
vierges, livres, 4200F, achete le 
5.3.85. Hubert Pres-Chez au 
951 44 98. 

VENDS pour Amstrad CPC 464, 
plus de 51 logiciels dont tous tes 
Cobra et Amsoft, Sorcery, Deca- 
thlon, Donkey Kong, Quasimodo 
1 et 2, etc. Tel : (67) 76 75 57 
aux heures de repas. 

ACHETE ou echange jeux ou 
utilitaires pour Amstrad. Marc 
MANCEAU "Chasse-Lievre" 

Crottet, 01290 Pont de Veyle. 
NDG : bis. NDLJC: Deux fois ? 
Et puis quo! encore 7 Ca va pas 



CHERCHE contacts pour echan- 
ger ou vendre des logiciels et 
programmes sur Amstrad. Oli- 
vier POSTY, 5 rue des Epis, 
68120 Pfastatt. 

VENDS Amstrad couleur, etat 
neuf, garantie, 5 jeux, assem- 
bler, 4000F. Patrick JEANSOU- 
LIN, 9 rue Raoux, 13009 Mar- 
seille. Tel: (91) 41 85 01 de 
15Ha 18H. 

CHERCHE contact pour mes 
100 logiciels Amstrad. Vends 
I'imprimante Amstrad 2000 F. 
Bruno BESSIN, 28 rue Emile 
Zola, 50100 Cherbourg. 

ECHANGE logiciels pour Ams- 
trad. Alain RENAUD, 6 rue de 
I'Amerique, 88100 Saint-Die. 
Tel : (29) 56 34 50. 



VENDS ou echange des logi- 
ciels pour Amstrad. Marie-Anne 
CHAMBONNIER. Tei : (3) 975 
89 79 apres 18H. 

VENDS Amstrad CPC 464 cou- 
leur sous garantie, logiciels, 
4200F, lecteur de disquettes 
Amstrad sous garantie. disquette 
avec jeux, 2500F. Roland PRE- 
MESNIL. 73 Square Sully Pru- 
dhomme, 77350 Le Mee/Seine. 
Tel : 409 07 90. 

VENDS Amstrad CPC 464, 2 
livres, synthetiseur vocal, ampli 
stereo avec 2 HP, 5 jeux, valeur 
5500F, vendu 4700F. Gerard 
CHAPPE, 100 rue du 11 No- 
vembre, bailment A2, 93330 
Neuilly/Marne. Tel : 308 55 77. 

CHERCHE possesseurs d' Ams- 
trad CPC 464 pour correspon- 
dences di verses. Regis le 
MONZE, 34 rue Graveran, 
29160 Crozon. 

VENDS, echange, programmes 
pour Amstrad CPC 464. B. de 
SACHY, 23 rue du gue, 95290 
lisle Adam. 

ECHANGE logiciels pour Ams- 
trad et lecteur de disquettes. 
Cherche contact pour trues et 
astuces. Michel POTIER, 42 rue 
Voltaire, 94190 Villeneuve St 
Georges. Tel : 389 62 44. 

VENDS ou echange K7 de jeux 
Amstrad en tres bon etat. Soliou 
ERWAN, 62 boulevard Emile 
COMBES, 35100 Rennes. Tel : 
(99) 50 84 86. 



CHERCHE correspondant pos- 
sedant Spectrum pour aides et 
echanges de programmes. Je- 
remy SACHETTO, 5 avenue 
Jean boccoce les colombes, 
84000 Avignon. 

CHERCHE contacts avec divers 
possesseurs de 48K, reponse 
assuree a tous ceux qui m'en- 
verront leur liste. Michel 
HAMER, 26 avenue des Aubepi- 
nes, B 4430 Alleur (Liege). 

CHERCHE contacts avec pos- 
sesseurs de Spectrum pour 
echange d'idees et de 600 pro- 
grammes. Envoyez liste a Leon 
OBLIN, 36 rue Croix Jacques, B 
6752, Villers la Loue. 

CHERCHE pour mon Spectrum 
casse, une epave de Spectrum 
a bas prix pour en (aire un avec 
2. Tel : (3) 979 05 06 (Poissy). 

VENDS ZX Spectrum 48K peri- 
tel, livres, 16 K7, programmes, 
1 390F, interface manette pro- 
grammable (Stoneship), 125F, 
manette Quickshot II, 75F, ma- 
gneto, 400F, ou le tout 1950 F. 
D.MOREAUX, 3 rue de Saulce, 
93250 Villemomble. Tel : 854 35 
20 (region parisienne). 

CHERCHE en region parisienne, 
un ZX Spectrum 48K pal, tous 
cordons, adaptateur pal-secam, 
a 1400F, donnerais 100F dun 
magneto. Sylvain ROUX, 1 7 
avenue de la Loume, 93410 
Vaujours. 



VENDS Spectrum, 48K, Fevrier 
84, interface ZX1, microdrive, 
imprimante Alphacom 32, ma- 
gneto, peritel, manettes de jeux, 
interface, nombreux logiciels 
(traitement de textes Pascal, 
gestion de lichiers assembleur, 
desassembleur, direction finan- 
ciere, nombreux programmes de 
jeux parmis les meilleurs), 
4500 F. Gerard au (3) 039 80 
13. 



- logo 



VENDS T07 70 + basic 
+ manuel d'initialisation 
teur K7 + manettes de jeu <■ 
extention musique et jeux + ext 
incrustation + livres + nom- 
breux programmes educatifs et 
jeux (chasseur omega, pac 
man , circu It , ten n is , zap 
track...) :5200 Frs (achete le 12- 
84).Mr DEYCARD 33145 St Mi- 
chel de Fronsac Tel :(57)24 98 
75. 



VENDS pour M05 :space shut- 
tle simulator 200Frs, pour M05 
et TO7/70 :mission pas possible 
120Frs, yeti 90Frs, pulsar 90Frs. 
cherche personne possedant 
androide sur M05 pour echange 
de tableaux .telephoner le soir a 
partir de 5h30 au 951 04 93 ou 
ecrire a Gilles Desforges 19 bis 
rue du pont Colbert 78000 Ver- 
saille. 

ECHANGE logiciels TO7/70 
divers sur K7 ou disquettes. Mr 
GAULHET Lestrade 15150 Laro- 
quebrou 

VENDS ou echange pour T07 
ou TO7/70 K7 (fox, thesaurus, 
super tennis, etc..) pour 250Frs 
piece... Cherche programmes 
dans revues {micro 7)et ancien 
numero de i'hebdogiciel 

Tel:16(75) 85 26 28. 

VENDS T07+ 16k + basic + 
magneto + picto + manettes de 
jeu + codeur + livres + pro- 
grammes (valeur 7600Frs) 
vendu 5300Frs. Port paye. 
GOEB BRUNO 92,rue de Bin- 
dernhein 67820 Wrttisheim. 

VENDS T07 + ext 16k + basic 
+ logiciel editeur assembleur - 
desassembleur - debuggeur + 
magnetophone + un 20 en de 
programmes + 4 livres (sur le 
basic. I 'assembleur ,et les 

jeux).Valeur totale 4600Frs, 
vendu 3000Frs a debattre. 
Tel :(70) 99 85 00. 

Recherche tous programmes 
-modestes ou non-pour T07 ou 
M05-Gerard LECLERCQ 21 
Avide St Germain 78600 Mai- 
sons Laffitte. 

Recherche photocopie des pro- 
grammes sur T07 des hhheb- 
dos de 5 a 14 compris. Fabrice 
BELLET. 10 rue de Verdun 
17480 Le chateau d'Oleron. 

VENDS codeur modulateur 
secam thomson Prix :450Frs et 
programmes pour T07 :prlot 
prix:100Frs contacter aux 
heures de bureau du (6)028 96 
45 poste 174.Demander JOLI- 
VET Jean Paul. 



VENDS TO7/70 sous garantie + 
magneto + basic + manettes 
de jeu + pictor + airbus + 6 
logiciel + 6 livres. Valeur 
9000Frs ,vendu 5500Frs donne 
avec une centaine de jeux et 
programmes. Sylvain SIMON, 
64 rue JJ Rousseau, 21000 
Dijon-Tel :(80)74 24 70. 

VENDS pilot, cyberlab pour 
M05, T07, TO7/70. Tel(23)69 
14 78 de 18 a 20h. Demander 
Olivier FOUTE. 

VENDS T07 + basic + ext 16k. 
+ lecteur K7 + Controleur jeux 
+ manettes + K7 blackgammon 
+ 3 manuels + 100 program- 
mes. Prix : 2800Frs -Tel :(6) 006 
17 17. 

ECHANGE pour T07 70 logi- 
ciels de jeux :aigle 
d 'or, bid uf, business... Tel :(79)64 
42 69. 

TO7/70istes, ne soyez plus 
seuls bidoui lions ensembles et 
e Ghana eons nos tuyaux 
Tel :(6)404 03 06 apres 19H30. 



Cherche lecteur de K7 enregis- 
treur + jeux de toutes sortes + 
iivre de programmes + crayon 
optique pour M05. Tel :(98) 85 
37 12entre 17Het19H. 



VENDS T07, crayon optique, 
lecteur de K7 special pour T07, 
extension me moire, extension 
son et jeu, 2 manettes de jeux, 
4 cartouches (basic, airbus, Pic- 
tor, trap), 2 logiciels K7 (pulsar 
2, Initiation au logo), 6 K7 plei- 
nes de programmes (jeux, utili- 
taires, langages, etc..) , 6 livres 
(manuels, programmes), le tout 
en parfait etat. pour 3900 F. 
Tel : (93) 77 23 56 (le soir) ou 
au (94) 96 16 19. 

Cherche et demande a des fans 
d'hebdogiciel de m'envoyer des 
photocopies de programmes 
pour M05 ou T07 rj'anciens nu- 
meros (du n° 1 au n" 73). CAR- 
RERA Cyril 32, avenue Frederic 
Garcia lorca 64000 PAU (Pyre- 
nees all antique). 
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Micro-ecole 



Lea malerleli ORIC so 



| desire commonder les moiS- 



39 Rua Victor Mniit T3009. PARIS .1, rie ' ( e ' lo icV 

HI. (I) 381 30 03 HX 649 383 f V 



Qio 


Dascriplion 


Prix 








mon re 


Total ; 






VIC 20 

VENDS Vic 20. lecteur de K7. 
8K, formation au Basic, livres, 
programmes, 1000 F. Jean- 
Christophe MARTET, 25 allee 
Georges Politzer, 92000 Nan- 
terre. Tel : (1) 725 18 33. 



ZX81 

VENDS ordinateur ZX 81, cla- 
vier mecanique, extension 16K, 
enregistreur de K7, tele N/B, ga? 
ran tie encore 4 ans, cordons, 
nombreux programmes, achete 
en ete 84 2090F, vendu 1700 F. 
Tel : (75) 61 72 38. Didier. 

CHERCHE genereux dona- 
teurs de ZX 81 ou autre ordina- 
teur, ainsi que peripheriques, 
pour creation d'un club. Domini- 
que PFIFFER, 55 rue des Tuile- 
ries, 68480 Ligsdorf, Alsace. 

VENDS ZX 81, 16K. manette de 
jeu. sonorisation du clavier, 20 
jeux sur K7, listings, 3 Ordi 5, 
livre Langage machine, valeur 
1500F, vendu 800 F. Tel: (8) 
364 27 38 aux heures de repas. 

ECHANGE sur ZX 81 , Cobra et 
Traffic, ou les vends 35F piece. 
Fabrics FRAULA, 60 quai de la 
liberation, 76480 Duclair. Tel : 
(35) 37 54 95. 

VENDS ZX 81, extension me- 
moire 16K, 2 K7 de jeux, 8 Ordi 
5, manuel de program mation, 3 
K7 vierges, 500F, tres bon etat. 
Sataski KURODA au (50) 49 12 
22. 



VENDS ZX 81, 16K, garantie 
encore 5 mois, 5 K7 de jeux (Ar- 
golath, Cobalt, etc.), clavier 
ABS, 3 Echos Sinclair, 2 livres 
sur le ZX. 2 revues avec des 
programmes sur le ZX, divers 
programmes, le tout pour 
1750 F. Jean-Michel PETIT, 48 
rue Bargue, 75015 Paris. 

VENDS interfaces ZX, carte 
son, synlhetiseur vocal, joystick. 
Tel : (50} 67 64 70 apres 
20H30. 

VENDS ZX 81, garantie 10 
mois. 16K, manuel, clavier ABS, 
alimentation, cordons TV et ma- 
gneto, 4 K7 de jeux (3D formule 
1, Cobalt, etc.), une K7 avec de 
nombreux programmes de 
I'HHHHebdo, plus listings, 
900 F. Carlos DAS NEVES. 1 
rue Bleury, 95230 Soisy / Mont- 
morency. 

VENDS ZX 81, 16K. clavier Pro, 
im prim ante, rouleaux papier, 
livres, programmes, loglciels, fi- 
chiers, complabilite, jeux, etc. Le 
tout monte dans un coffrage ou 
support pouvant porter un moni- 
teur, magnetophone. Tel : (32) 
21 36 63 le soir a partir de 19H. 
Valeur 2700F a debattre. 

VENDS ZX 81 (6.84), manuel 
d' utilisation, 300 F. Laurent au 
(63) 59 63 71 aux heures de 
repas. 

VENDS ZX 81. 16K, 4 livres, 8 
K7, cordons, magneto, nom- 
breux programmes (fiste sur de- 
mande), valeur 1700F, vendu 
900 F. Tel : 876 37 08 a partir 
de 20H. 

VENDS ZX 81, manuel, alimen- 
tation, K7 de jeux, nombreux 
programmes, clavier ABS, ma- 
gneto, 1000F, ou echange 
contre Oric 1 ou Atmos. Ro- 
muald DUPONT, 18 rue des tuli- 
pes, 59940 Estaires. Tel : (28) 
46 50 75. 

ECHANGE programmes 1 6K 
pour ZX 81, envoyez votre liste 
a Patrick MONTASTIER, 2 rue 
Rene Caille, 87000 Limoges. 



VENDS ZX 81, 16K. clavier me- 
canique, programmes (K7 et lis- 
tings), livres et divers, 600 F, 
Tel : (3) 064 46 79. 



VENDS Simulaleur de vol et 
Chess pour ZX 81, 39 program- 
mes pour Texas, Apple, Oric, 
etc., 24 programmes pour ZX 
81, valeur 238F29, vendu 185 F. 
Nicolas BRINK au (22) 76 42 
16. 

CHERCHE contact pour echan- 
ger programmes, trues sur ZX 
81. R. ANTOINE. 11 rue de la 
rive, 69120 Vaulx en Velin. 

VENDS ZX 81, 16K, clavier 
ABS, nombreux logiciels, revues 
specialises, tres nombreux lis- 
tings, K7. Tel : (40) 97 22 88 
aux heures de repas. 

VENDS ZX 81, 16K, clavier 
ABS, livre, alimentation et 
cables d'origine, livre Langage 
Machine com pre nan t 60 pro- 
grammes dont 10 jeux, 13 pro- 
grammes de I'HHHHebdo (Rep- 
tile, R'bert, Football, ZX Textes 
II, Cramp., ZX Synthe, Mister 
Ploufy, ZX Donkey, Night Flyer, 
Meteor mission, Serpent, Bolte 
a outlls, Milie pattes), le tout 
800 F. Freddy GUENARD, 1390 
avenue Tourmaniantz, batiment 
2, 62100 Calais. Tel : (21) 97 20 
04. 



VENDS ZX 81 , 32K, clavier me- 
canique, housse, 8 logiciels, 
livres, revues, etat neuf, entiere- 
ment revise par Sinclair en Juin 
85, valeur 2200F, vendu 1500 F. 
Christophe JELLERET, 86 rue 
du bas de grange, 181Q0 Vier- 
zon. Tel : (48) 75 73 37. 

VENDS ZX 81, 16K, simulateur 
de vol Pilot, HHHHebdo No 54, 
61, 64, 89, 750 F. Tel : (53) 87 
26 15. 

VENDS ZX 81, 16K, clavier 
ABS, alimentation, livre Langage 
Machine, 3 K7 (Simulateur de 
vol, Gulp, Invaders) achete en 
Aout 84, vendu 600 F. Tel : 256 



VENDS boitier Peripherique, 
carte peripherique (neufs) 
achete 1100 F Vendu 800 F. 
Ainsi que logiciels ; Donkey 
Kong: 150 F; Othello: 100 F; 
Alien Addition : 70 F 

(neufs) ;Parsec : 150 F; Inva- 
ders : 100 F (neufs) avec K7 de 
jeux hebdo-micro 7. S'adresser 
a Mr AYELLO Guy 21 rue Ana- 
tole France 81400 CARMAUX. 

VENDS joystick SUPERSOY 26 
prise Atari, Amstrad, Cbm, Msx. 
3 boutons de tir ! 70 F., port 
inclus. NOWAKOWSKI Laurent 
11 rue Mozart 62950 Noyelles 
Godault. 

VENDS et ECHANdlE program- 
mes jeux et utilitaires pour Apple 
lie. lie. RECHERCHE carte ZB0 
avec CP/M et doc. BENSAID 
Fabrice, 20 rue Louis David 
93170 Bagnolet Tel : 897 16 20. 

ECHANGE Drive 810 pour Atari 
contre 500 programmes. Laurent 
DUFOUR 74 rue David D'angros 
75014 Paris Tel : 206 58 05. 

RECHERCHE Imprimante, Co- 
deur interface RS-232 C contre 
500 Programmes. Contactez 
Laurent DUFOUR 74 rue David 
d'Angers 75014 Paris Tel : 206 

58 05. 

ECHANGE 92 jeux et utilitai- 
res III pour MSX (Zaxxon, Sor- 
cery, Congo, Bongo, etc.). De- 
mander Emmanuel GONZALEZ. 
Tel : 16(93)61 30 18. 

VENDS ou ECHANGE program- 
mes pour MSX (K7). River 
Raid : 150 F.. Interieur : 150 F., 
Pac Man: 125 F. et Budget 
Fam. :90 F. VENDS ZEN (as- 
sembler) 250 F. Tel : (1) 255 

59 78. 

DEBUTANT Micro echangerait 
echo dijital BF a memoires 
contre ordinateur (basic); ou/et 
acheterai extension pour ZX 81 
occasion, Ainsi que Logiciels. Mr 
CASTILLE 47 Villa des Princes 
92100 BOULOGNE BILL. Tel: 
(1)604 98 87. 



ECHANGE programme pour Vi- 
deopac, Videopac + , jopac, 
contre programme des memes 
ordinateurs, pour plus de rensei- 
gnements Tel :(8) 381 53 69. 

VENDS programmes sur feuilles 
de livres, 10 F. le programme. 
Programmes pour : Alice, Apple 
II, Atari, BBC Electron, CBM 64, 
Amstrad, Dai, Hector HR, Laser 
200/210, Lynx, Ond/Atmos, 
Seger SC3000, Spectrum et 
ZX81, Tl 99/4A, etc... Ecrivez 
a :TATSE Charles 333 rue du 
pres de I'ane 73000 Chambery 
le Haut. 

VENDS MSX 64k yeno DPC 64 
(1/85), moniteur taxan ex(4/85), 
data recoder sanyo, paddie, 
cables, doc, assembleur zen, 
eddy 2, divers jeux, le tout 
6000 F. Tel : 360 99 34. Mr 
CARO 211 BD Davout 75020 
Paris. 

VENDS Microvision, 4 K7 de 
jeux (flipper, casse briques, ba- 
taille navale, super casse bri- 
ques) :650 F.F ou I'echange 
contre B.E pour TI99/4A avec le 
manuel et des jeux. Ecrire a Mi- 
chel SCHMITT 38, rue du- Dia- 
pason 44300 Nantes. 

ACHETE Spidey n° 1, 21, 41, 
ainsi que Titans n° 2, 3, 5. 8, 9, 
13, 14 au prix d'origine. Frais de 
port a ma charge. Faire offre 
a :MIRAMOND Christophe 6 
Avenue Leon Blum 87000 Limo- 
ges. 

VENDS Lazer 2000. manettes, 
livres et K7 programmes : 500 F. 
Mr DENIS 26, rue A. Fratorcci 
92170 Vanves Tel : 736 41 34. 

VENDS Newbrain AD 32k RAM 
29k ROM basic et graphisme 
etendu, 80 colonnes alimenta- 
tion, cordons de branchements 
dont 2 pour lecteurs K7, ma- 
nuefs. Lecteur K7 philips D6600. 
Moniteur vert Sanyo SG12. Le 
lout en bon etat pour 2200 F. 
Eric LA ROCCA Tel : (6) 029 89 
05 Apres 19h. 

VENDS Parsec 120 F. Hunt the 
wumpus 80 F. Le TI99/4A a I'af- 
fiche :20 programmes basic, ex- 
plication 40 F. Tel : 631 13 01 . 



RECHERCHE genereuse per- 
sonne donatrice dun AMS- 
TRAD CPC 464 couieurs ou 
dun APPLE lie, moniteur vert, 
contrdleur, drive ou I echangerait 
contre: un electrophone, 100 
cartes postales. 50 livres de bi- 
bliotheque rase et verte, livres 
Agatha Christie, 13 livres 
Unesco, 150 F. de BD, 6 jeux 
de societes : Monopoly, La 
bonne paye, Risk, Buteur. Le 
compte est bon, Puissance 4. 
Encyclopedie 18 livres ."tout 
I'univers", 12 livres France Loi- 
sirs, 1 jeux electronique Terra 
Hit.. Merci d'avance BARBOU F. 
10 rue bossuet appt n° 3862 Le 
Mans 72000. 

NDLJC: En voila un qui s'croit 
au marche aux puces. 

VENDS console CBS, 6K7, mo- 
dule turbo le tout en parfait etat 
1600 F RECHERCHE vieux dis- 
ques des Rolling Stones faire 
offre. Frangois ISNARD Ville- 
neuve 86300 Champigny Tel : 
(49) 46 50 86. 

CHERCHE donateur de Photo- 
copies de pages pedagogiques 
des n° 55, 56, 57, 58, 59, 60, 
61. 66, 71, 76, d'hebdogiciel Mr 
MOULAI. 5 rue Pierre Curie St 
Prix 95390 Tet : (3) 416 58 99. 



etal 



CHERCHE n'importe quel ordi 
nateur meme en mauvais 
pour creer un petit club informa- 
tique. Attends vos responses e 
I'adresse suivanle JANSEM Em- 
manuel, 6 rue Madame Lalle- 
mand Puttelange aux Lacs 
57510 



ECHANGE logiciels et program- 
mes ou VENDS livres : exerci- 
ces pour M05, T07, TO7/70. 
Tel: (59) 04 50 14 entre 12h et 
13h30. 

VENDS PC1 Tandy, imprimante, 
magneto K7, doc 1500 F. Vends 
PC2 Tandy, imprimante, ma- 
gneto K7, DOC, Akmey : 
3500 F. Patrick MATEO imp Sa- 
lomon Coudec 34500 Bezisiers 
Tel : 67 62 21 66. 
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les fichiers RELATIFS a 1'AMDOS 
avec de nouvclies command©; BASIC, 
un MONITEUR disque el beaucoup 



I floppy ou un 664 



Commodore 138. Vous y 

apercu complet des 

successeur du celebre 

presentation detaillee 

operating system. Le super nouveau 

BASIC Commodore 7.0 est decrit ainsi 

que la configuration de la 

lecteur de disquette 1571. Pour tous 
les Commodoristes ! 
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la page pedagogique 



la page pedago ZZ 



Formation a I'assembleur 



COURS D'ASSEMBLEUR 



Vous etes, grace a I'HHHHebdo,- 
devenus des quasi-cracks de 
I'assembleur. Mais ne partez 
pas ! Les bonnes surprises et 
les bons plans vont se multiplier 
dans les prochains cours, vous 
tran s portant jusqu'au nirvana 
des programmers. Comme lou- 
jours le cours theorique bran- 
ch era les fans du tordu alors 
que les bidouilleurs se branche- 
ronl direclement sur leur cours 
rien qu'a. eux I 



Vous avez deja eu droit aux dis- 

cours suivants, dans votre page 

che he par-dessus tout : 

ZX 81 -* 55 56 61 66 71 76 81 

86 91 94 

ORIC -* 57 62 67 72 77 82 87 

APPLE -* 58 63 68 73 78 83 88 

93 94 

THOMSON -. 59 64 69 74 79 

84 89 94 98 

COMMODORE -> 60 65 70 75 

65 90 94 99 



Nous en sommes reste, la der- 
niere fois, a une question parti- 
culierement angoissante : 

comment resoudre te probleme 
de priorite dans les interruptions, 
en particulier celles provoquees 
par les peripheriques. Pour cette 
derniere exploration dans te cer- 
veau des concepteurs d'ordina- 
teurs, nous devrons faire revenir 
a notre memoire cerlaines des 
regies evoquees lors du dis- 
cours sur les sous- programmes. 

Deja, avant d'etudier a fond 
cette enigme, nous aliens devoir 
etablir une categorisation des in- 
terruptions pour etablir une hie- 
rarchie de celles-ci. En effet, il 
pa rait difficilement imaginable 
de laisser le micro- pro cesseur 
se debrouiller sans aucun point 
de repere dans ce qui peut de 
venir une tempete de signaux 
electriques en provenance des 
ports d'entrees- sorties. 

Jusqu'a present, nous n'avons 
tenu compte que deS seules in- 
terruptions en provenance de 
1'exterieur, celles venant de peri- 
pheriques en somme. De fait 
ces interruptions possedent ge- 
neralement l'immense avantage 
d'etre programmables par I'utili- 
sateur. En revanche une se- 
conde categorie, celle-ci interne 
a I'ordinateur, restera inalienable 
et Intouchable autrement qu'en 
se saisissant de son fer a sou- 
der et en modifiant certains des 
branchements sur les cartes. De 
ces deux categories, que nous 
allons nommer pour plus de 
commodite, nous tjrerons une 
premiere echelle de priorite 
dans le traitement des interrup- 
tions. 

Une chose parait certalne : les 
interruptions internes au sys- 
teme, celles qui sont dites non 
masquables, ne pourront 
jamais passer apres une inter- 
ruption d'origine exterieure a 
I'ordinateur. Les interruptions 
provenant des peripheriques 
sont dites, elles, masquables 
Ce terme sous-entend une 
chose tres simple : dans le re- 
gistre d'etat, que nous avons vu 
dans ce cours il y a fort long- 
temps, se trouve un bit essential 
a la manipulation des interrup- 
tions. Bien entendu suivant les 
machines, d'autres registres in- 
terviendront dans le traitement 
de ces interruptions, registres 



programmables direclement par 
I'utilisateur. L'organisation de 
ces registres reste propre a cha- 
cune des machines, variant 
meme avec un meme micro-pro- 
cesseur : les Interruptions ne se 
program meront pas forcement 
de la meme facon sur un Atmos 
ou un Apple alors que le 6502 
regne a hnterieur des deux ma- 
chines. 
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qui permettent au micro-proces- 
seur, en testant simplement le 
contenu de son registre d'etat, 
de savoir si la requete presen- 
tee est recevable ou non a I'ins- 
tant oil elle arrive. 

Dans les nouveaux micro-syste- 
mes informatiques (Amiga, Atari 
520 ST ou Macintosh) des 
micro-processeurs esclaves du 
68000 gerent les interruptions 
de telle maniere que le 68000 
ne s'occupera que du traitement 
effectlf des routines d'interrup- 
tion. Si une requete de moindre 
importance se presente, les co- 
processeurs s'occuperont de la 
faire patienter jusqu'a ce que 
I'etat du registre de status 
change et autorise cette inter- 
ruption. 

Ces interruptions d'interruptions 
paraissent fort complexe, a 
contempler sur le papier un des- 
criptif litteraire. Une schematisa- 
tion graphique de la chose sim- 
plrliera sans aucun doute le 
raisonnement de maniere a 
eclairer definitivement votre lan- 
terne. 



Que se passe -HI done lorsque 
vous decidez, en temps que 
program meur, de neutralise r 
temporal rement les interruptions 
en provenance de 1'exterieur du 
micro-ordinateur ? Les peripheri- 
ques n'ont aucune raison de 
s'arreter de formuler des reque- 
tes en direction du micro-pro- 
cesseur. Celui-ci etant protege 
contre ces troubles, les deman- 
des sont stockees dans un en- 
droit de la memoire jusqu'a ce 
que vous autorisiez a nouveau 
la circulation de ces requetes 
jusqu'au micro-processeur. 



Dans les interruptions non mas- 
quables il existe aussi une hie- 
rarchie interne. Ainsi une inter- 
ruption demandant la 
reinitialisation du systeme (reset 
tiede) passera devant toutes ses 
collegues, quel que so it le 
contexts. Dans les gros syste- 
mes informatiques, I interruption 
la plus prioritaire sera celle qui 
provoquera la sauvegarde auto- 
matique de tous les travaux en 
cours sur disque dur lors de la 
detection dune chute de tension 
sur le reseau d' alimentation du 
systeme. L' Importance des tra- 
vaux en cours ne permet pas de 
perdre la moindre information, 
aussi des la chute de tension 
captee par le micro-processeur, 
celui-ci interrompt tous les tra- 
vaux en cours et effectue une 
sauvegarde d'urgence de toute 
la memoire volatile. 



Revenons a un niveau plus ge- 
neral du traitement d'exception 
qu'est celui des interruptions. 
Comme nous avions pu le voir 
pour les sous- programmes, a 
hnterieur d'une routine en cours 
d'execution, on peut effectuer un 
appel a un autre sous-pro- 
gramme. Le nombre d'appels 
imbriques autorises par un 
micro-processeur est determine 
par la capacite de stockage de 
la pile systeme. Cette capacite a 
accepter un nombre donn6 d'ap- 
pels imbriques se nomme la 
profondeur d'appel. De la meme 
facon, une routine d'interruplion 
peut etre elle-meme interrompue 
pour laisser la priorite a i execu- 
tion d'une interruption plus ur- 
gente a traiter. De la meme 
facon que pour les sous-pro- 
grammes, la pile sert alors de 
zone de stockage des adresses 
de retour en fin d'execution des 
differentes routines. 



Pour qu'une routine d'interrup- 
tion puisse interrompre sans 
vergogne une autre routine d'in- 
terruplion en cours de traite- 
ment, il faut necessairement que 
celle en cours d'execution soit 
strictement moins prioritaire que 
la nouvelle a se presenter a la 
porte du micro-processeur. De 
cette regie, les concepteurs ont 



Le premier dessin Illustrera la 
methods d 'imbrication des routi- 
nes d 'interruption. A chaque in- 
terruption nouvelle, le proces- 
seur sauvegarde I'ensemble des 
registres dans la pile ainsi que 
I'adresse a laquelle il devra re- 
prendre le travail une fois la rou- 
tine executes. 




L'ASSEMBLEUR PRATIQUE 
Langage machine... SurZX81 



Routines d 'interruption 



La seconde illusration montrera 
le cheminement suivi par le 
micro-processeur lors d'une re- 
quete d'interruption. L'interroga- 
tion du registre d'etat lui indi- 
quera s'il doit accompli r la 
routine d'interruption correspon- 
dant a la requete ou s'il devra 
mettre celle-ci en attente. 



Enrichir son vocabulaire est une 
facon sOre de progresser dans 
la connaissance du langage 
symbol ique d 'assemblage. 

L'agencement judicieux des ins- 
tructions en vue de la bonne 
execution d'un programme re- 
leve d'une pratique souvent ton- 
gue a acquerir, mais I'apprentis- 
sage d'une fonction nouvelle est 
heureusement quasi-instantane. 
Posseder le vocabulaire le plus 
large possible est une condition 
indispensable a ['elaboration de 
programmes optimises, e'est-a- 
dire qui exploitent au mieux les 
possibilites d'un microproces- 
seur donne. Je vous propose 
aujourd'hui la mise en oeuvre 
pratique de nouvelles instruc- 
tions d'assemblage dans le 
cadre d'un petit programme dont 
I'objectif pourrait vous sembler 
paradoxal. Pourquoi ? Parce 
qu'il vise a la suppression d'une 
instruction du langage concur- 
rent : le SAVE du Basic. Consi- 
derez comme declaree la guerre 
des langages informatiques I 
En situation de guerre, e'est 
bien connu, tous les coups sont 
permis, les plus vicieux etant 
general ement con side res 

comme les plus heroiques. Ainsi 
I'infiltration d'espions dans les 
lignes ennemies, les substitu- 
tions d'identite, la disparition su- 
bite d'un chef d'etat- major au 
sein meme de son QG, tout cela 
vous fait courir un frisson deli- 
cieux au long de I'echine, de la 
base du kepi au talon de la 
botte! 

Notre mission est a peu pres 
analogue : il s'agit d'infiltrer sou- 
terrainement le listing Basic en- 
nemi, de remonter insidieuse- 
ment jusqu'a la tete-de-pont 
constituee par I'instruction SAVE 
et de la neutraliser en lui substi- 
tuant un trompe-l'oeil, un ele- 
ment qui fera diversion. Vous 
n'etes pas sans ignorer, Mes- 
sieurs, I 'importance de cette 
mission. Privee de son SAVE- 
eonduit un programme Basic ne 
sait plus s'orienter. Ou 
commence-t-il ? En ligne 20, en 
llgne 1000 ou 2000? Nul ne 
saura plus le dire I II sera des 
lors facile de multiplier les faus- 
ses pistes, de tendre des 
pieges, des chausse-trappes a 
tous ceux qui s'aventureraient a 
dupliquer le log id el ainsi pro- 
tege ! Ah !Ah !Ah ! -(rire inquie- 
tant...). Preparez le commando 
d'elite binaire pour I'operation 
MATATARI 1 Messieurs vous 
pouvez disposer 1 Ah lAh !Ah ! 
-(rire satanique resonnant lon- 
guement sous les voOtes humi- 
des et sombre du bunker). 

Pour le programmeur neophyte 
I'interet de I'operation reside 
egalement dans la decouverte 



d'une possibiiite d'action, par le 
langage machine, sur le corps 
meme d'un programme Basic 
deja installe en memoire; ('inte- 
raction de I'assembleur et du 
Basic demultipliant les possibili- 
tes des deux langages. 

Entrons, baionette au canon, 
dans le vif du sujet. 
Un programme Basic stocks 
dans la memoire du ZX81 est 
en realite compose d'une suc- 
cession d 'octets codes repre- 
sentant, dans leur ordre respec- 
tif : 

1. Le numero de ligne (sur deux 
octets) 

2. La longueur de la ligne (sur 
deux octets) 

3. L'instruction Basic avec son 




obi igatoi rement a 
16510 et s'acheve au debut du 
fichier d'affichage. C'est done 
dans les limites de oet espace 
que nous chercherons l'instruc- 
tion SAVE. Chaque instruction 
etant codee sur un octet unique, 
a SAVE correspond la valeur 
248. Mais cette valeur peut se 
retrouver fortuitement dans un 
numero de ligne ou encore dans 
I'argument d'une fonction, c'est 
la raison pour laquelle, afin de li- 
miter les risques de confusion, 
notre recherche portera sur une 
chaine d 'octets compose de 
I'octet "SAVE", du guillemot qui 
le suit fatalement, et de deux 
caracteres choisis arbitrairement 
qui seront places imperative- 
ment apres le guillemet (ici "* " 
en video inversee). 
Une fois le SAVE localise, il suf- 
fira de lui substituer un carac- 
tere quelconque; j'ai choisi pour 
de machiaveliques raisons ITn- 
nocente instruction REM 
Ah !Ah !Ah 1 Et pour donner a 
cette ligne de REM un aspect 
tout a fait normal il convient de 
supprimer le guillemet et les 
deux "$ *, Je les supprime sans 
I'ombre d'un remords 

Ah !Ah lAh l-(dangereux)-N'oub- 
lions pas non plus t'lnversion 
video automatique de la der- 
niere lettre de I'argument de 
SAVE. Je la retablis dans sa 
"couleur" initiale en en sous- 
trayant le facteur 128. II ne teste 
plus qu'a effacer le dernier guil- 
lemet et le mauvais tour est 
joue... 

Cela donne le programme sui- 
vant dont nous allons examiner 
certaines instructions inedites a 
ce jour : CPIR, XOR, SBC. 

Le premier module de traitement 
a pour objectif essentiel de deli- 
miter I'espace sur lequel portera 
notre recherche, e'est-a-dire la 
totalite du listing Basic en me- 
moire. Pour cela on prepare les 



registres doubles HL et BC. Le 
premier recoit I'adresse de de- 
part de la recherche (16510), le 
second, qui servira de compteur, 
devra contenir le nombre d'oc- 
tets maxi sur lequel portera la 
recherche. Pour cela il suttit de 
soustraire de I'adresse de fin de 
recherche (celle du FA) 
I'adresse de debut de recher- 
che. Cette operation se fait 
grace a I'instruction SBC HLBC, 
son resultat etant range dans 
HL. Mais il faut toutefois prendre 
garde a I'indicateur de report 
(Carry) qui est systematique- 
ment pris en consideration dans 
cette operation. Afin d'eliminer 
tout risque d'erreur on le posi- 
tionne prealablement a zero 
grace a I'instruction XOR A. 
C'est ici la seule utilite de cette 
instruction qui, en r6alite, effec- 
tue sur son operande un OU ex- 
clusif logique. Pour des raisons 
inherentes a la construction du 
programme les valeurs de HL et 
BC sont sauvegardees pour etre 
immediatement apres sorties de 
la pile par les instructions POP 
BC, POP HL qui ouvrent la bou- 
cle L0 et permutent les valeurs 
des deux registres. Nous ver- 
rons pourquoi plus precisement 
en abordant le deuxieme mo- 
dule de traitement : Identifica- 
tion de la chaine d'octets. CPIR 
en est I'instruction centrale. 
C'est une instruction extreme- 
ment elaboree dont le fonction- 
nement merite d'etre decrit en 
detail. CPIR execute une 
comparaison du contenu de I'ac- 
cumulateur avec I'octet pointe 
par HL; mais a la difference 
d'une simple instruction CP elle 
effectue en cas de resultat ne- 
gatif une operation decremen- 
tation sur le registre HL et simul- 
tanement une decrementation 
du registre BC; apres quoi le 
cycle redemarre jusqu'a ce que 
la recherche aboutisse (compa- 
raison positive) ou que BC soit 
egal a zero. BC joue done le 
role de compteur d'octets, tandis 
qu'HL pointe successivement, 
par incrementation automatique, 
sur toute la zone a tester. Vous 
comprenez maintenant pourquoi 
nous avons donne a HL 
I'adresse 16510 et a BC le nom- 
bre d'octets du listing ! 
II vous suffit d'executer cette 
routine, immediatement apres le 
SAVE: 

10 SAVE "PROGRAMME" 
20 RAND USR x (x peut pren- 
dre une valeur quelconque puis- 
que la routine est entierement 
relogeable) 

...et vous etonnerez tous les 
ceusses qui croient qu'on ne 
peut exister sans avoir d'origine. 



Bernard GUYOT 



Vous etes dorenavant arms 
pour faire face aux multiples 
problemes poses par la pro- 
grammation des interruptions. 
Pour tirer un parti maximum de 
votre machine, vous serez tenu 
de suivre les specifications qui 
lui sont propres, mais le schema 
general expose ici suffit ample- 
men! a exposer le schema de 
fonctionnement general de cette 
methode de programmation du 



tire des methodes de codage micro-processeur. 



REM • DISPARITION DE SfitJE 

REM » LIMITE DE LA RECHERCHE 

LD HL.< 14396) 
LD BC. 16510 
PUSH BC 
XOR A 
SBC HL.BC 
PUSH HL 
lLO POP BC permuti 

POP HL HL »"■' 

REM » IDENTIFICATION DE SAUE 
LD A. 248 SWE 

CPIR 

JP NZ.743 Rttour 

PUSH HL 
PUSH BC 
LD A.<HL) 

CP II Retour 

JR NZ.LO 
INC HL 
LD A.(HL) 

CP 141 * 

JR HZ.LO 
INC HL 
LD A.<HL) 

CP 141 * 
JR NZ.LO 



dtbut listing 



REM « REMPLACE PAR REM 

DEC HL 

LD (HD.234 

LD A.i) 

LD B.3 
;L4 INC HL 

LD <HD.A 

DJNZ.L4 

REM * RECHERCHE DERNIER * 

LD A. 11 
:LS INC HL 

LD D.(HL) 

CP D 

JR NZ.L5 

REM * INVERSE DERNIER CARACTERE 
DEC HL 
LD A.<HL) 
SUB 128 
LD (HL).A 
INC HL 
LD (HL).O 



la page pedagogique, 



Z la page pedago __ 



la page pedagogique 



la page pedago Z2 



Les deux programmes de Christian DINET, permettent lapprentissage et le calcul des aires et volumes usuels. 



Mode d'emploi: 

Apres choix dans le menu du type de prableme, suivre les Indica- 
tions du programme. Une reponse fausse offre la possibility de re- 
copier I'ecran sur imprimante THOMSON PR 90-080. Les posses- 
seurs de I'irpprimante PR 90-040 dovront supprimer les lignes 1 a 4 
et remplacer dans le programme, EXEC COPECRAN par SCREEN- 
PRINT. 




AIRES et VOLUMES surTO7,TO7/70,MO5 



Aires 



3 DATA5E, 54, 198, 64, £47, 96, 43, 189,£3£, 18, 
■ ■ ■■ . . ■..;■■■..:■.■.■. ■■:■■ : ■ 
.95,64,134, ISJ.lll.ifS, ,^, 36.S5J , 198, 8, 2 

4.8,134,4 
0,52,2,52,1ft. 134,6,52,2,198,64,166,228,8 
2/£jl56,.l 32,68* 196.228, 38. ESI, 50, 97,49, 1 
36,48,86,36,237 

4 DATA 86,189,232,13,37,52,48,137,254,23 
£,106,228,32, * 48.1,186,22 
E,38j £85, SB, 97, 198, 18,189,232,18,37,25,4 

I 37,8,248, *8,95,64j 37, 183,284,4,18,18 
J, £32, J7,8,74, 38j 248, 198, 15, 189,232,1 

8, 5S ■ 1 . 198, 16, 247, 96, 43, 189, 232, 18, 53, 18 



flAXIMIN 

9 REM ft********************************* 

19 CLS:NE=0:NJ=0:NF=S 

15 PI=3. 14159 

£8 SCREEN 2,8,8 

CLSsGOSUB 1880:LQCATE7,6:COLOR8,3s'P 
AGE AIRES 

sie PRINT"CftRRE" TflBC3B>J"l° : COLORE. 8: LO 
CATE7,?sCOL0R8,5 

£28 PRINT"RECTANGLE";TABC30);"£":COLOR2, 
8! LOCATE?, 8: COLOR0, 3 

230 PRINT"PARALLELO5fiAmiE"iTAB<30);"3":C 
OLOR£,0:(.CCATE7,9:COLOR8,5 
£48 PRINT"LOSANG£"lTAB<30)i"4 u :COLOR£,0: 
LOCATE?. 18sC0LOR8,3 

250 PRINT"TRflPEZE";TflBC38>; "5" ICOLORE, 81 
L0CATE7,11:CQL0R8,5 

260 PRINT B TRI6ttGLE";TflB(38>;"6":C0L0R2,8 
:LQCATE7,12:C0L0R6,3 

278 PRINT"PQLYGONE REGULIER"; TAB(38); "7" 
i COLORS, 8i LQCATE7, 1 3> C0L0R8, 5 
£88 PRINT"DISBUE":TAB(38)J"8"iC0LOR£,e:L 
QCATE7,14JC0L0RB,3 

£90 PPINT'COURONNE d* TISSUE"," TAB<38)I "9 
'■ i COLORE, 8iL0CfiTE7, 15i C0L0R8,5 
380 PRINT"SECTEUR d* DIS0UE"J TAB<29)J " 18 
"iC0L0R2,8iL0CflTE7, 16iCOL0R8,3 
318 PRINT"S£GMENT de DISOUE"! TAB<29)! " 1 1 



LOCATE?, 181 COL ORB, 3 

338 PRINT"ELLIPSE H JTAB<29);"13"ICOL0R£,8 

:LQCATE7,2BlC0LQR6,7 

348 INPUT "Indtflutz votre ehoixi",C 

358 IF C<»8 OR C)«14 THEN 288 

378 OH C GOTO 2888,3888,4888,5888,6888,7 

888,8880,9888,18888, 11088, 12080, 13088, 14 

088 

480 REM aMflESSAGE D£ CHANGEHENT DE PAGE 

** 

410 L0CATEe,22:CQL0R3lPRINT"Aw>usar sur 

una toueha pour eontinuar. "1 

420 ZJ-INKEY*! IF2*«""THEN4£e 

430 C0N80LE21.23ICLSI CONSOLES, 24 1 RETURN 

458 REM ** MESSAGE CONFIRMATION SOLUTION 

468 LOCATES, 23 i C0LQP3I PRINT "Conf ir»«i-vo 

Uf i/otr« r«F>on»t?(0^N)"; 

479 Z*-INKEV«i IFZ*> '"THEN479 

488 RETURN 

588 L0CATE8,23iPRINT H l 



ia?<0'l 



(*■*-•! 



518 Z»-INKEY*tIFZ«-""THEN51B 

528 RETURN 

1080 B0XFUS,4)-<:2e,24),3iBQXF(21,4)-C43 

.12), 5 

1018 60XF<:44,4)-<S£,£4),3ie0XF<53.16>-(7 

5,24), 5 

1820 BQ)!F(?6,4)-<e4.24>,3ieOXF(85,4)-<10 

7. l£>,5 

1838 BOXF(108,4)-ai6,£4),3:BOXFai?, 16) 



■U4; 



.24>,5 



1048 B0KFI148,4)-(148,24),3iB0XFa49,4>- 

(171, 12), 5 

1050 B0XFtl72,4>-aee,24),3iB0XFC181,16> 

-<203,24),3 

1068 fi0XF<284,4W£l£,£4),3lB0XFt£13,4)- 

(237, 12), 5 

1078 B0XFt£36,4)-c:£44,24),3:B0XFC£45, 16) 

-(269,24), 5 

1B80 B0XF<268,4)-<:2?6,£4),3!B0XF<27?,4>- 

<381,12),5 

1090 BOXF(3B0,4)-(38&,24),3 

1180 80XFa2,171>-<:£e,193),3l8QXF(£l,187 

)-C43,195),3 

1110 B0XFC44, 17D-C52, 195), 3i B0XF<33, 171 

)-(75,179),5 

11£0 B0XF<76, 171)-(84, 195) . 3!BQXF<:85, 187 

>-(187,195),5 



1138 B0XFCL8B, 
I71)-<139,179> 
1148 BDXFC146, 



187W171, 



195), 5 



-U16,19S),3iBQ)!F(117, 
■(148,195), 3iB0XF(149, 
■(188,195), 3IB0XFU81, 
■ <:£!£, 195), 3IBDXFC213, 
■<£44,195>,3iB0XF<£45, 



1158 B0XF( 

171)-<£03,1?9),5 

1160 S0XF<284,17i: 

13?)-(235,195>,5 

1178 B0XF(236, 171 ; 

171>-(267,179),5 

1180 B0XFC268, 171)-<:E76, 195]', 3: BOXF(E77, 

!:?:->-<E99,I95),5 

1198 B0XF(3ae, 171>-<368.195>,3 

1280 RETURN 

2880 NE=NE+1:CLS:SCPEEN£,9,0:'AIPE DU Cfi 

2018 LOCATE 1£,£:CQLDR0,3:PRINT"AIRE D' U 

N CARRE*:COL0R2,8 

2020 BOX<242,34)-<:278,70), 1 

2038 LOCATE 29,3:PPINT"A" 

S048 LOCATE 35,3:PRINT-e 11 

£058 LOCATE 35, 9:PR1NT"C" 

2868 LOCATE 29, 9tPRfNT"D" 

2878 L0CATE3, 4: COLORS, 5 i PRINT "AB*BC=CD=() 

A»a"iC0L0R2,8 

2088 LDCATE32, 6: COLORS, 5: PRINT'S": COLORE 

,9 

£890 LQCATE2e,5!CrjLQR8,5:PRINT-S=a*a«a-£ 

": COLORE, 

2100 LOCATE2,9IC0LOf)8,5:PRINT'L«* cota* 

«ont an e«"iC0L0R2,8 

2118 L0CATE6,7HNPUT-AB-»--,CA 

2138 LOCATE 3, 1 1 i COLORS, 3 

2148 PRWCalculax l'aire du carra dont 

215B L0CATE29,5:C0LCR9,8iPPINT"S"*»a«*' v 2 

"I COLORE, 

2168 GOSUB24800 

2178 G0SUB49S 

£188 GQSUB24508 

£198 SA»CA'2iLINE(164, U3i-(164. 146), 1 

2288 L0CATEl,14iCQL0R8,5IPRINT"R«ntraz 1 

a solution *tC0L0R£,8 

£218 LOCATE?, 161 INPUT H S-",SB 

2£12 G0SUB458 

££14 IFZ»"*N"0R2*""n ,, THEN££ie 

2£16 IFZ»"*0"0RZ*""o-THEN£228ELSEC0SUe45 

0>GOTO££14 

2226 IF SB<"(SA-,l >0R SB>"(8A*.l ) THEN 

2258 

££38 GOSUB241B0 

££40 C0T02428B 

£250 LQCATE26,5:CQL0RS,5iPRINT"S«a*a-a*2 

"■COLORE, 

£££0 GOSUB 2460S 

226£ G0SUB588 

2265 IFZI>-N , -ORZ»"n-THEN2290 

2270 IFZ*--0 , ORZi- l, o-THEN£275ELSEG0SUB58 

0IGOTO2265 

£275 C0KS0LE££,'£3iCL3iC0NS0LE8,24 

22B5 EXEC COPECRAN 

2290 GOTO 24E8B 

2999 END 

3808 NE"NE*liCLS!SCP£EN2,0.8!'HlRE DU RE 

CTANGLE 

3813 LOCATE 10, £i COLOR0, 3:PRINT"AIRE D'U 

W R£CTANGLE"tCOL0P£,9 

30£8 B0X(194,42)-(38£,7e>, 1 

3030 LOCATE 23.4!PRINT"A" 

3046 LOCATE 38, 4: PRINTS" 

3050 LOCATE 33, 10! PRINTT" 

3060 LOCATE £3. 10: PPINT"D" 

3978 L0CMTUi:.4:!:-.;.;:...j;m. l 5!PRlNT"fiiii = [;e = L':i'-i 

rraueur^'^COLOPE.B 

"■:>"» i.\'Cf. ■-■::. •:^::- ■ ■■<■>,, 

r-aeur;."! COLORS, 8 

3090 LOCATES J, 7! :OLOR0, 5-iPRmT n S*L*l"»C0 

LOR£,0 

:■[<:< L^iViii.S:: i^^Sv. «!!'!<; is V-: r.,..;., 

son* en cm"!C0L0R2,0 

3110 L0CATE2,7: INPlJT' 1 rtB=L- ,, , LA 

3120 L0CATE2,8: INPUT"AH=1=",L8 

3125 IF LB)Ltt THEN 3120 

3130 LOCATE 3,11=COLOR0,3 

3140 PRINT" Calculez 1'aire au rectangle 

3158 LOCATE£9,7:COLOR0,S:PPINT'S=L<1-:CO 

L0R2,8 

3168 GOSUB24088 

3178 GOSUB400 

3188 G0SUB245SS 

3198 SA'LA*LB!LINE<164, 113W164, 146), 1 

3208 LOCATEl,14:COLOR0,5:PRINT-Rcntr-GI I 

3 solution a :COLOR2,'0 

3219 LOCATE?, 16: INPUT"S»", SB 

3E1E GOSUB450 

3214 lFZ»-"N-ORZ* I ' , n"THEN3210 

3216 IFZ*="O' , ORZ*=' , o"THEN3220ELSEGOSUB45 

9-.G0T03214 

3££8 IF SB<=(SA-.l )0R SB)=tSA*. 1 ) THEN 

3E50 

3838 GOSUBE4108 

3240 GOTOE4209 

3250 L0GATE29, ?!S0LOR8,5iPRINT"S=L*l"fCB 

L0R£,9 

3E60 GOSUB 24600 



3E62 GOSUB5S0 

3B65 IFZ*-"N"ORZ*= H n"THEN3290 

";■"'.;• iFZ*= ,, 0"0PZ*='o ,, THEN3E75ELSEG0SU85B 

0:GOTO3265 

3275 C0NSOLE22, 23: CLSi CONSOLES, £4 

3285 EXEC COPECRAN 

3290 GOTO 24208 

3999 END 

4000 CLS:SCREEN2, 9.0: 'AIRE DU PARALLELOG 
PAFME 

4004 NE=NE+1 

4018 LOCATE 10, 8: COLOP0, 3: PRINT" AIRE D'U 

hi PARALLELOGRA(1nE":COLOR£,0 

40£8 LINE(204,34)-C312,34),1 

4021 LINE(186,70>-C294,70>,I 

4022 LINE(204,34)-a86,70),l 
WS1- LINE(312,34)-<294,78), 1 

4024 LINE(204,35)-(204,69),1 

4025 BOX(205,&£>-C£l£,7e>,t 

4026 LOCATE 25,9: PPINT'H" 
4030 LOCATE 39,3:PR1NT"B" 
4040 LOCATE 24,3:PRINT"A* 
4050 LOCATE 37,9:PRINT ,, C• 
4860 LOCATE ££, 9:PR1NT"D- 

4970 LOCATE2,3:C0LOR8,5:PRINT"AB=DC=L'!C 

OLOR2,0 

4980 LOCATE2,4:COLOR0,5:PRINT-AD=8C=I':C 

OLOR2,0 

4085 LOCATE£,5!COLOR0,5:PRINT'AH=h-:COLO 

R2,8 

4098 LOCATE£9,7iCOLOR0,5:PRINT"S=L*h"!CO 

LORE, 8 

4108 LOCATE£,9:COLOR0,5:PRINT"Les cotes 

son*; en en" : COLORE, 9 

L0CATE£,7:INPUT-AB=L=",PA 

120 L0CATE2,8HNPUT°AH»h*",PB 

125 IF PB>PA THEN 4120 
"" LOCATE 3,ll:COLOR0,3 

140 PRINT°Calculez l'aire du parallelog 



L0CATE29, 7: COLOR0, 0:PRINT-S=L»h" :C0 
LOR2,0 

"" G0SUB24888 
4179 G0SUB488 
4188 GOSUB24580 

4190 SH«PA»PB:LINEC164, 113>-(164, 146), 1 
428B L0CATE1, 14: C0LOR8, 5i PRINT"Pentrez 1 

4210 L0CATE7,16: INPUT'S*", SB 

4212 GOSUB450 

4214 IFZ*="N , 'ORZt="ii"THEN4210 

4216 IFZ*="O"ORZ*=''o ,, THEN4220ELSEGOSUB45 

0SGOTO4214 

4229 IF SB<-<Sfl-,I )0R SB> = lSA*-.l ) THEN 

4250 

4E38 GOSUB24108 

4E48 GOTO24280 

«,■'-« „:><:uit:.'7- ■■: : qi**&, 5;f-iv:N T: -K==i.*n": r.-U 

L0R2,9 

4E68 QOSUB24600 

4E6E G0SUB588 

4265 IFZ*="N"0RZ»="n"THEN4£9e 

4278 IFZ*="O"ORZ* = l 'o'THEN4275ELSEGOSUBS0 

0:G0T04265 

4E75 C0NS0LE2E, 23: CLS: CONSOLE0, £4 

4E85 EXEC COPECRAN 

4E90 GOTO E420B 

4999 END 

5000 PEM-.»«*«»* 

500E CLS:SCREEN£,0,0:'AIRE DU LOSANGE 
5004 NE=NE+1 

5010 LOCATE 10,£:COLOR0,3iPRINT"AIRE DU 
LOSANGE": COLORE, 

5020 LINE<£49,34)-(186,5£),i 

5021 LIME(186,52)-<249,70),1 

5022 LINE<249,70)-(312,52),1 

5023 LIHE(312,52)-<249,34),I 

5024 LINE(I87,52)-<311,52),3!LINE<249.35 
)-(' 249,69), 3 

5838 LOCATE 31,3!PRINT"B* 

5048 LOCATE ££,6:PRINT"A" 

5858 LOCATE 39,6:PRINT"C 

5860 LOCATE 31, 9:PRINT"D" 

5978 L0CATE8,4!COLOR9,5:PRINT'AC=D(Grand 

e dia9onale)"iC0L0R2,8 

5089 LOCATES, 5iC0L0R8,5i PR INT-BD=d( Pet it 

e dia9onala)-:C0L0R£,8 

5898 L0CATE12,7!COL0R8,5iPRINT"S*i:D»d)'-£ 

": COLORE, 6 

5100 L0CATE2,9:C0L0R8,5iPRIHT-Les cotes 

sort an cm-:C0L0R2,8 

5118 L0CATE8,7UNPUT-AC=D=",PA 

5128 LOCATE0,8: INPUT -BD-d=",PB 

51£5 IF P6)PA THEN 51£0 

5130 LOCATE 3, 1 HCQLORB, 3 

5140 PRINT-Calculer l'aire du losange do 

nt yous a- uez donne les dimensions: " 

5150 L0CATEl£,7:C0L0R8,8:PRINT-S=(D»id)/£ 

'■:COLOR£,0 

5168 GOSU8E4800 

5170 GOSU8400 

5180 GOSUB245B0 

5190 SA=(PA*PB)^£: LINE (164, 113)-a64, 146 

), 1 

5200 LOCATEl,14:COLOR0,5:PRINT"Rentrez 1 



PRINT"AIR£ DU 



a solution":COLOR2,0 

5210 LOCATE?, 16: INPUT 

5212 G0SUB4S8 

5214 IFZ»=-N*ORZ*= 

5£16 IFZ*="0-ORZJ= 

8:G0T05£14 

5££8 IF SB<=<SA-.l )0R SB>=CSA+.l ) THEN 

5258 
5238 G0SUB24188 
S£48 GOT0E4288 

5258 LOCATE12,?:COL0Ra,5:PRINT"S = (D»d)-^2 
": COLORE, S 
5E68 G0SUB24688 
5E62 GOSUB500 

5265 IFZ*="N-ORZ*="n°THEN5£90 
5270 IFZ*-"0-0RZ*'="o-THEN5275ELSEG0SUB5e 
8:G0T05265 

5£75 C0NS0LE22, 23 : CLS: CONSOLES, 24 
5£B5 EXEC COPECRAN 
5E90 GOTO 242SS 
5999 END 
6880 CLS: SCREENS, 0,9: 'HIRE DU TRAFE2E 

6884 NE*NE+1 

6810 LOCATE 10,0: COLORS, 3: 
TRAPEZE": COLORE, 8 

6820 LINE<284,34>-<£54,34), 1 

6821 LINE<:i86,70)-<318,7e),l 
6022 LINE<284,34)-<186,78),1 
6823 LINE(254,34>-(318,78),1 

6024 LINEC£84,35)-<:204,69),3 

6025 BOX(£04,64)-(£99,69),3 
6826 LOCATE 25, 9:PRI«T"H" 
6939 LOCATE 32, 3! PRINT"B" 
6040 LOCATE 25, 3: PRINT-A- 
6050 LOCATE 39,9:PRINT"C" 
6860 LOCATE 23,9:PRINT"D" 

6870 L0CATE8,3:C0L0R8,5:PRINT"AB«b<|>etit 
e base H ;C0LOR2,S 

6080 LOCATES, 4: COLORS, 5: PRINT"CD=B< grand 
e base)":C0L0R2,8 

6885 LOCATES, 5: COL0R8,5: PRINT" AH=h" i COLO 
R2,0 

6890 LOCATE10, 7: COLORS, 5! PRINT "S«((B+b)-- 

£)*h":COLOR2,0 

6100 LOCATE2,9:COL0RB,5:PRINT"Les cotes 

sont en c»": COLOR£,0 

6110 LOCATES, 6: INPUT"AB=b=", PA 

61E8 L0CATE8,7:INPUT°CD=B=",PB 

6125 IF PB<PA THEN 612B 

6127 L0CATE8,8:INPUT"AH=h*",PC 

6138 LOCATE 3, 1 1 : COLOR0, 3 

6140 PRtNT-Calculez l'aire du trapeze do 

nt wm; a- uez donne les dinensions:" 

6150 L0CATE18, 7 i COLORS, S:PRINT"S=(<B+b)^ 

£)*h":COLOR2,0 

6160 GOSUB24S80 

6170 GOSUB408 

6188 GOSUB24508 

6198 SA=(CPA+PB)-'2)*PC:LINEC164, 113)-<16 

4. 146), 1 

6289 LOCATEl,14!COLOR0,5:PRINT'Rentrez I 

a solutton-:COLOR£,0 

6218 L0CATE7,16:INPUT"S=",SB 

6212 GOSUB450 

6214 IFZ*=-N"ORZ*="n"THEN6210 

21'fi I FZt= " 0"ORZ*= " o"THEN6220ELSEGOSUB45 
0:GOTO6E14 

62E8 IF SB<=(SA-.l )0R SB)*<SA+.l ) THEN 
6258 

6238 GOSUB2410S 
6240 GOT0242B8 

6250 LOCATElB,?iCOLOR0,5:PRENT H S=C(B*b>-' 
E)*h":COLOR2,0 
6E68 G0SUB2468S 
6£6£ G0SUB58B 

6265 IFZ*="N-0RZ*="n"THEN629S 
6270 IFZS="O"ORZ*="o"THEN6275ELSEGOSUB50 
8:G0T06265 

6E75 C0NS0LE22,23:CLS: CONSOLES, 24 
6EB5 EXEC COPECRAN 
6E90 GOTO £4288 
6999 END 
7Q8B REn»«»t»* 

708S CLS:SCREEN2,8,B:'AIRE DU TRIANGLE 
7864 NE**E+1 

7818 LOCATE 18, EtCOLORS, 3!PRINT"AIRE DU 
TRIANGLE"iC0LOR2,8 
7929 LINE<249,34>-<186,78>,1 

7021 L1NE<1S6,78>-<31S,7S),1 

7022 LINE(318,78)-<249,34),1 

7023 LINE<249,35)-(£49,69),1 

7024 B0X(249,64)-C254,69),3 
7038 LOCATE 23, 9:PRINT"B* 
7048 LOCATE 31, 3:PRENT"0' 
7858 LOCATE 39, 9:PRINT"C" 
7866 LOCATE 31,9:PRINT"H" 

7978 L0CATE8,4JC0L0R9,5:PRINT-eC«b(base> 

"!COLOR£,0 

7088 LOCATES, 5: COLORS, 5: PR INT" AH=h< haute 

ur)":COLOR2,0 

7090 L0CATEl£,7:COL0RS,5iPRINT*S = (b*h)'-S 

":COLOR2,0 

A SUIVRE... 
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Cassez du jaune en multi-touche 



ORIC/ATMOS 




Jacques DELORME 



ttmtts 

'/f*#v6Mf 
v ^ J«wr 
gggglf) 




: REM 



TIGRE 
£ RED DELORME Ov.-'e. J -' 

2 REM 4. RUE DES FUSIL I ]-!-■:, 11 . FTiYRL 

4 REM 1470U PRLRISL 

5 D 1 Mi>: b : IJIMTH-: 

S PAPERS 'lHKlj (jiViUI3&4' 1,1151 IB 14" 

7 G0SUe44 aC=0:GMTU15 

8 REM TIR 

3 IFMU;-23THEH(.Liyueiy>J 

10 EXPLODE 

11 FORI = lT04 = PLuriS+l, 15-1 /('S'PLfJ 

rs-M^i.ii* 

12 PL0Ti5+I,lS-I," "ipLO:riffi-I,15- 
I," " 'NEKT 

13 IF¥=19THENIff-:>le;flHL':-Ki;iTHEHiS4 

14 E5T027 

15 REM JEU 

16 PL0T20,3, " ! "'Pl.iji ::? I £. '■-■■■!-■! ■ < 

T22,10,"-":PLOT20,tl,"!" 
I? PBKE#38E, 12? 

!■- ii--&v---ri;il?s :■:.'.■: ;N!>-i :;»j0tl,0'PLPiY2 
.5,3,55 
19 H»=INK RIHX 1 1*50 i ' IFfiV=2THEN21 

28 GOT019 

21 PLOT16,20, 12 PLOT17,20, M ik>"- 
FLGT22.20,8 

22 X=IHT.:RH[» 1 >tl4.-12 Y=;Irir.:RH[" 
1>*12)+2'XX=«'YY=Y 

2.;: PLuT27.18,STR*<;RL.>'IFfiL-'21uTHE 
NGDSUB18? 

24 plot:-:, y, a* ■ x=xx ■ y=yy ■ plotx, y, b- 

* 

25 IFS0=1THEN S0UND4 , 5000 . 8 ' PLRY2 
,5,3,35 

26 IFIJSR(SP)THENMU=MU+M GOTO? 
£7 IFUSR<y >iiOU! roi.isHENXKsX-l 

23 IFUSR<ft>T*ENIFX<L2THENXX-K+l 

29 IFUSR'.K>TH£NRL=RL-10'IFY>L3THE 
NYY=Y- 1 

30 IFUSR<:0>THENHL=HLHB'IFY<L4THE 
NYY=Y+1 

31 IFUSRCCTR)THEN233 

32 PLOTX, Y,H*'X=XX'Y=YY'PLOT;<,Y,B 
* 

33 U=INT<RND<1>*3^1FU=2THENU=-1 

34 V'llfKRNfKI >*33 If v^2THENV=-l 
J:; is ■.■■- ■.'.'■ :■' ■■■ I 

36 IFU<0THENIFX>LlTHENXi<=X+U 

37 IFV>0THENIFY<L4THENYY=Y+V 

38 IFV<0THENIFY>L3THENYY=Y+V 

■?S PL0T2CI.9,":" PLOTig,le,"-" PLO 
T22, 10, "-" i PLOT20, 1 1 - " 1 " 

40 F=F+1'IFF=5THENF-0'FU=FU-1'PLO 
T27 , 21 , SIRS': FU > ■■ I FFU=0THEN24 1 

41 IFFU=5eTHENIFFlfl=0THENGOSUei7G 

42 PLOT37,MU," " i S0T023 

43 REM TRBLEFlU DE BORD 

44 POKEK26fl,10'CLS:pfiPER0'INK3 

45 HL=400'FU=200'MU=16'ri=.l'flM=0' 
BB=0'CC=0 

46 FORI=2T015 ' PLOT1 , 1 . £0 ' PLOT1B, I 
,16'PLOTll.I,26PLOT30,I,16'PLOT3i 
,1,20 

47 NEXT 

48 PLOT11,15.0'PLOT10,15,16'PLOT3 
1,1S.20'PLOT2.16,0PLOT1,1.0'N=8 

49 PL0T2.17,17'PL0T12.17,16'PLQT9 
,28,18 'PLOTS, 22, PL0T9,24,18 

50 FORI=20TO24PLOT2.I,1'PLOT13,I 
,3'PL0T12,I,16'NEXT 



51 FORI = 17T023'PL0T.14, I,18'FLQT25 
■ 1,16' PLOT 13 ■ 1 , e ' PL0T24 ,1,3' NEXT 

S£ PLOT.J,2a,"ilLTi" 'PLOT':, 22, "FUEL 
11 ■ PLOT? . £4 , "RRME " ' PL0T2, 25. 6 

53 F0RI=17TO24PLOT34,I,N'PLOT36, 
I,"-u"H=N-l'HEXT 

54 PL0T26, 17,21 'PLOT33, 17,16'PLOT 
26, LS,21 -FLOT33, 18, 16 

5'J PLCTi-6 , ZH , 20 • PLOT33, 20, 16 = PLOT 
.16, 21, 2D PL0T33, 21,16 

56 FLOT.';,".. 17, ■'ftLH"'PLOT27,20."FU 
EL" 

57 PL0T£7.18,STRJ*PfL)'PL0T27,21,S 
TRS<: FU J 

58 PLOTS, 17, "SCORE ' PLOT35,25. "H 
RUE" 

59 PLOT15,22,"\" PLUT15, 23, "UV ' P 
L0T23,22,'V"'PL0T22,23,'V0" 

■;-v !"-!._OT!.-\ 24, "RADAR" 

61 REM 

62 P.ETURN 

63 REM EXPLOSION 

64 ZflP'SC-SU+l PLOTk, l"i",S"l'R*<'Sr;> 

65 FORI =ST01 5 ' PLOT 1,1, 2d ' PL0T2, 1 , 
1 ' NEXT 

66 PLOTX, Y,R* 

67 F0RI=1T06 

6':? PLOT19-I.ie.' , * , ''PLOT19-tI,10,"* 
» i PLOT J9-1, 10-1, "*" 

65 r-LOT['ii,li?-!.".:." i'L'JTl?, 10+1 , "* 
"'PLOT19+I,10+I,"*" 

70 PL0T19-1 , 10+1 , "*" ; PL0T19+1, 10- 
I,"*" 

71 EXPLODE'.J=I-l 

72 FL»T19-J,lu," " PLijTly+j, 10," 
":PL0T19-J,13--J," ". 

73 PL0T19, J0-J." "'PL0T19, 19+J," 
" FLOT19+-J,10+J." " 

74 PLOT19-J,i0+J," "PLOT19+J.10- 
J," " 

75 NEXT 

76 PLQT13-, 10," "'PL0T25,1@," "'PL 
0T13.4," " 

77 PLOT 19, 4," "PLOTig-ie," "'PLQ 
T25.16," " 

i PL0TU.16," "'PL0I25.4," 



fJT 



' SHU 



79 FORI=2re!.5'PL!jT.?..i,7 = ME«T 
:-■;■-•- !*■■;;:'> Vi:-i'.'-M ;,'»! '.<■'. '. s«», B ■ PLHY2 
,5,3,35 

51 PL0T16,29," 

52 GOTO 16 

83 REM GENERIGUE 

34 HIRES 'PAPER4' INK? 

85 CURSET50,S0,3 FILL42. 1,1 'CURSE 
r::-'-ri .;s>. i-ni.l..«; 

36 CURSE F30, 123,1 'FILL23,i,i 

87 CURSET140,124,3'FILL15,1.7CUR 
SET! 20, 135,3'FILL10-1,7 

■::■:: ■;iJRSETe8»-49#-3-'FILL2e,l/3 

89 CURSET83, 103.0 

30 FORI = lT023'RERDft,E'DRflWl : l,B,l'M 
EXT 



XT 

99 CURSET8,20,3FILL10.1,0 

?'- :..^-.-,:i*f'::' ;.'^:,,v;. :-. 
RN5.1,l'DRflW5,4,l 

100CUPSET166,100,0'DRRU-2,5.1'OR 
RWl,3.1'[>RflW2,3,l 

181 CURSET14i,U5,0'DRf*W18.-4,l 

102 CURSET115, 165,0FORI-1TO16'CI 
RCLE 1,1= NEXT 

103 CUR3ET145, 160. 1 ' F0RI"1T022 'CI 
RCLEI.l'NEXT 

104 CURSET160,160,0'FORI=1TO16CI 
RCLEI.l'NEXT 

105 CURSET175, 145.0 'F0RWT018' CI 
RCLEI , 1 ■■ NEXT 

106 CURSET205,1B5.8'FOR1=1TO15'CI 
RCLEI , 1 1 NEXT.' CURMOV 16,-7,8 

107 F0RI=1TU8'CIRCLEI,1' NEXT 'CURS 
ET228,134,0'FORI=-1TO10'CIRCLEI,1'N 
EXT 



XT 

109 FORI=1TO7'DJRSET10,110,0'DRHW 
10* I . -80 , 1 ' REfiDFW ' L^RSCC FW 5 

110 CURtW0,-8,0 = CHRfl:L,0,l 

111 PLRY0,7,0,0'FORJ=3@TO0STEP-1' 
S0UND4, J, 15'NEXTJ 'PLRY0, 0,0,0. NEXT 
I 

112 CURSET90-4g,0'FORI»lT08'RERDfi 
*'L=«HSC<FW>'CHRRL,0,1CURMOV7,0,0' 
SHOOT 

113 WflIT10'NEXT'PING 

114 CURSET110.65.0 

115 F0RI«1T05 

116 FORJalBTOlSTEP-l'CIRCLEJ, l'CI 
RCLEJ, ' NEXTJ ■ REHDfl* ' L=RSC< fl* ) 

117 SOUND4,0,0=PLflY0,7,l,4000'UHI 
T20 ' PLRY0, 8, 8, 

118 CHRRL.0.1 CURHOV15.0.0 

119 NEXT I 

120 CURSET96,60,3'FILL16. 1,21 'CUR 
SET190,60,3'FILL£0, 1,20 

121 F0RI = lT022'REHDN,0,T'tHJSIC2,0 
,N,0:MlJSICl,O+l,N,0'PLfiY3.0. 1,5600 

122 WHITT*2 

123 NEXT ' PLRY0, 0, 0, 

124 RRINT-'fiPPHnez wi- un* touche" 

125 PLRYI,0.0,0'H=15'FORI-0TO15'F 
ORJ»=200TO50STEP-20 ' SOUND1 , J, H ' NEXT 
J 

126 H«H-1'NEXTI 

127 GETP*' RETURN 

1E8 DRTR42,-10,4,4,34,2,1,2.S.1,5 
,2.1,2,-2,3.-6,3,-3,1,-2.6,-5.2 

129 DRTR-8. 0,-1. 1,-3.0.-2,-2,-3,0 
,0.3,-2,2,-3,1,-20,18.-3.2,-6,8 

138 DflTR-4,-2,-2,-3,9,-I9.-8.-3,- 
30,0 

131 DRTR-1 1,-9. -3. -1,-5. 5. -1,12.1 
,2,5.-3.8,0.4,3,-14,3,-3.1,-2,-3,1 
,-3,6,-6 

132 DRTR13, -12,7.-1,2,3, -5, 10 

133 DflTfl-4, 3, -2,4, -6. 1,-5,-7,0,-2 
,0,2,-8,3,-l,3.J2.2 

134 DRTflD,E.L.0,R,M.E,P,^,e.5.e,nl 
,t,e,T,I,G,R,E ' 

135 REM DRTfl MUSIOUE 

136 DRTR8.3.8.1.3,24,5.3.8,6,3,8, 



10,3,8,1,4,8, It*. ?.3.:=,j.i ":■!.'•;.. : :.sj 

137 DflTB6,-:-.i3..3.3.3,: : : -S.&.t,, if:.*-. 
.3,8,1.3,3.. 1,:;,<3. 6,3,6-3, 5, ft. 1,.^ ft 

138 PRTfi3,3,S,5.3.«,l,3,24 

139 REM PRE3ENTRTI0H 

14S TEXT'PKSri' -i'SUr, ; [i\ki : - 

= PFiPER4'INK0 

141 P(.iKF.»26Fl, 1H 

142 PRINT" Aires rsttaqij.e dt PK 
-HflRBOURG," 

143 PRINT'PRINT"le= force*- -Japon? 
is«5 s'attaquetit" 'PRINT 

144 PRINT"?.u>: iles du. Pacif iiuie. " 
PRINT UfiIT350 'PRPEP2 

145 PRINT" flfi-n de Proteser- les b 

i£*= . :W* 4X^Z" PRINT 

146 PR I NT "r-*.->.'. If c.;i.:.p-,ni3ndeme-ftt d J 
une escadri lie" PRINT 

147 PRINT"de'TIGRES Volants' ." 'PR 
INTWflIT350'PHPER3 

148 PRINT" PI bord de votre »PPar 
eil WOWS-'PRINT 

149 PRINT"Poursuiwez renTiemi et 
devez abattre" 'PRINT 

150 PRINT"les 'ZERO' Jj.Ponv^i?.. » = 
PRINT'UP.IT350'PRPER5 

151 PRINT" Rtterjtlon ! , vou.a etirs 
lirnite en" PRINT ' URIT100 

152 PRINT"cai-bui-ant e*. en nu.Tiitio 
ns. Le vol" PPINTUflIT100 

153 PRINT"? moins de 280 n est da 
nQereux. "'WRIT50 

154 G0SUB246' EXPLODE PMPER6 

155 PRINT'ZflP'PL0T2,26,12'PL0T3,2 
6, "RPPuae? sur une touche" 

156 GETP* 

157 CLS'PfiPER3'INK0'PING 

158 PLOT8,1.17'PLOT0,2,17 

159 PRINTCHR*< 4 >'PL0T14, 1 , 10' PLOT 
15,1," C0MMRNDES"'PPINTCHR»C4> 

168 PR1NTCHR«4)'PLOT14,2,10'PLOI 

15,2, " C0W1flNDES">PRINTCHR«i:4) 

161 PL0T5,6."H. Pour mointer"'PL 
0T5,8,"Z. Pour descendre" 

162 ■PLOTS, 10, "<, Pour alUr a 
Bauche'' 'PLOTS, 12, ">. Pour aller 

163 PL0TS,15,"SP. Pour t,irer"'PL 
OT5,17,"CTRL.Pour sortir du jeu" 

164 PLOT2,20,"NOTfl' Vous Pouuez a 
cticnner Plusleurs" 

165 PL0T9, 21, "touches en heme tem 
P»" 

166 T J OKEtt30E.192'l*HIT280'SHOOT 

167 PLOT0,23,20'PLOT1,23.7 

166 PL0T4.23."VTJULEZ-WKJS LE SON 
DU MOTEUR ?"'SO»0 

169 GETP»'IFP*="0"THENSO=1 
178 PLOT0,25-21 

171 ZflP'PL0TS,25,12'PL0T6,25." «P 
Puaez sur CTRL" 'P0KE#38E. 127 

172 IFUSR<CTR)THENRETURN 

173 G0T0172 

174 REM RLRRMES 

175 REM Pll,P<RME CRRBURRNT 

176 PL0T7,22.12.PL0T8,22," muw" 'P 
LOT12,22.8'flR"l!POKE#30E, 192 

177 SOUND1,0.15'SOUND1,99,0'PLHY1 
,0,4,70'WflIT60iPLRY0,0.0,0'POKE#30 
E,127 

Suite page 27 



Classique, vous etes perdu dans un labyrinthe en 3D 
habit6 par un redoutable minautore, vous connaissez la 
suite... 

Xavier PAULIK 
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TI99 BASIC ETENDU 






O REM THESEE 

00 DIM V0(7, lOl.HEIH. lOl 

10 FOR T=l TO 7 :: FOR U=0 TD 10 : : H6( 

,U)»0 :•: VD(T.U)=0 i ; NEXT U :t NEXT T 

20 FDR T=l TD 10 :: HE(B,Tl-0 :a NEXT T 

30 MINO=l 

40 TU=0 

50 BON=li 

60 GOTO 420 

70 CALL CLEAR :: CALL CH«R(92, "01O3O7OF 

F3E7FFF",91,"FEFDFBF7EFDFBF7F".'?0. "FFFE 
FCFSFOEOCOaO") 

BO CALL CHAR(B9."FFFFFFFFFFFFFFFF ,, ,42, " 
FFFFFFFFFFFFFFFF" ) 

90 RESTORE 2tO 
200 D=5 :: 3=1 
210 FOR T=l TO 1B6 
220 READ A 

230 S=B+1 :: IF S=33 THEN B=2 :: D-D+l 
240 CALL HCHAR(D,S,fll 
250 NEXT T 

DATA 92,89.89,89,91,32,92,91,32,92,9 



330 RESTORE 380 
340 FDR T-l TO 10 
350 READ A,B,C 
360 C 



B,0,[ 



,32,9i',( 



,89,' 



,32,92,89, 



',91, 32, 92, S 



,72, B9, 89, 91 
DATA 42,42,42,42,90, 
:, 42, 42, 42, 90, 32, 42, ' 
90,32,42,42,42,90 
BO DATA 32,42,89,32,32,32,42,91,89,42,8 
■. 32, 42, 9 1. 9 1,32, 32, 42, 91, 89, 91, 32,42, 91 

32,32,42,91,91,32 
:vo DATA 32,42,89,32,32,32,42,42,42,42.- 
,32,42,42,90,32,32,42, " 
,42,90,32 
DATA 32,42,89,32,32, 
*,42,91,B9,91,32,92, 
.91,32,42,91,89,91 
DATA 32,42,90,32,32,32,42, 
O, 32, 42, 42, 42, 90, 32, 42, 
"" 90,32,42,42,42,90 
CALL COL0R«2,lO,l,E 
CALL 
A599423C") : i DISPLAY 
PAULIK" 



370 NEXT T 

3B0 DATA 100,262,238,100,233,229,500,24.2 

,258, 200, 233, 229, 200, 20B, 204,200, 19&, 192 

,200,175,171 

390 DATA 400, 14.5. 161, BOO, 173,171,1,175,1 

71 

400 DISPLAY ATtZ4,l)I" FIRE TD BEGIN 

410 CALL KEY(2,R.5):i IF R=1B THEN 520 E 
LSE CALL SOUND (-1, 600, 0>:.- GOTO 410 
420 .CALL CHAR(112, "000000000000O0OO030C0 
■1A0A02 



430 CALL CHARC40, "FE5454545454FE", 64, "00 

00007aFCFCFC78" ) 

440 CALL CHARI116, "0B1BFBFFDE9OB0E7F09OE 

OCOO 1 020 A3 2000000800000008060 1 B08080BBBB 

848"} 

450 CALL CHAR(95,"7E2C1B185ABDBD7E",94," 

7E7E7E7E3C0000 , ',93,"03040E0B9B606090",lfl 

O, "447CFE54387C5438") 

460 HPS-0 :: PTS=15 

470 CALL CHARI96, "0001030301000305051903 

O5O9O1O00300COE0EOCOBOE8EBDOCQCO6O201OA0 



'., 42, 42,89,32,42, 42 2FE" 



OFO"} 



310 I 



S2t C 



11,1,6, 11, 
. CbAR(36,"3i;325 , ?Al 
i "* XAVIER 



CHAR < 124, "FF7F7F3E1C08000000000 
OOOOOOOOOOOBOOOOOOO " &RPT* ( " O " , 40 ) ) 
510 CALL CLEAR :: CALL MAGNIFY(3):: CALL 

SCREEN12) : : GOTO 170 
520 CALL DELSPRITEIALLJ:: CALL MAGNIFYI3 
):: GU=0 i; KI'O :: JIUI=0 :: PTS-15 
530 CALL CHAR(52."000O000OO0OO0OOO"> 
340 CALL CHARC33. "0102040B10204080 ,, ,34," 



8040201008040201" ,35, "B0B0B0808080a0B0" ) 
530 C*ALL CHAR<36,"B0B08080BOB0B0FF",37, 
■01010101010101FF",3B,"OOOOOOOOOOOOOOFF" 

560 CALL CHAR<39, "0101010101010101") 

570 CALL CLEAR 

560 CALL C0L0R(2,2, 1) :! CALL BCREENI2) 

590 CALL CHAR(B9,"0044442B10101010") 

600 FOR T=2 TO 32 STEP 3 :: CALL VCHARd 

,T,42,22):: NEXT T 

610 FOR T=l TO 22 STEP 3 :: CALL HCHAR(T 

,2,42,31):: NEXT T 

620 CALL C0L0R(2,2, 1):: FDR T=3 TO 13 :! 

CALL COLOR (T, 16,1): : NEXT T :: DISPLAY 
AT(24,7):"LABYRINTHE EN CDURS. . . " :: GOT 
680 

630 FOR T=4 TD 19 STEP 3 :: FOR U-3 TO 3 
O STEP 3 !! GT=INT(RND*2):i IF 0T=O THEN 

CALL HCHAR(T,U,32,2) 
640 RANDOMIZE :: NEXT U :: NEXT T 
650 FOR T=5 TD 29 STEP 3 : : FDR U™2 TO 2 
2 STEP 3 :: BT=INT IRND*2) : ! IF GT-0 THEN 

CALL VCHAR!U.T,32,2) 
660 RANDOMIZE :: NEXT U :: NEXT T 
670 CALL C0L0R12.6.1):: GOTO 880 
6B0 HHLI=IMT(RND«19+4)!: CALL I3CHAR (HHU. 4 
,Z):: IF Z=42 THEN 700 
690 RANDOMIZE :: GOTO 6BO 
700 CALL SPRITE(#Ki.96.2. (HHU-3)*-B. 16) : : 

CALL VCHAR(HHU-2,2,32.2) 
710 CALL C0LDR(9,11,1) 

720 FOR T=l TD INT IRND*4+1 ) : : CALL POSIT 
1GN(#10,A,B);: B=B+24 :: IF B>=240 THEN 
B60 

730 CALL LOCATE (#10, A, B) i : CALL VCHARfA/ 
B+1,B/B,32.2): : NEXT T 

740 RANDOMIZE :: OJI=INT!RND*12+2) i I IF 
CUI=6 THEN 830 
750 IF CUI=8 THEN 770 
760 IF CU1=12 THEN 800 ELSE 740 
770 FOR T=l TO INT<RND#3+2)! ! CALL POSIT 
ION(#10.A.B):: A=A-24 :: IF A<-B THEN 79 



: CALL HCHAR<A/ 



7SO CALL LOCATEf#10,A,I 

B+3,B/B+1,32,2):; NEXT T 

790 GOTO 720 

BOO FOR T=l TD INT(RND»3+2):: CALL POSIT 

IDN((HO,A.B! : : A=A+24 :'i IF A>=176 THEN 



40 

B40 CALL LDCATE()HO,A,B):! CALL VCHAR(A, 

8+1, B/B, 32,2) : : NEXT T 

B50 GDTD 740 

B60 CALL P08ITI0N(#10,A.B):: S0RTI=A7B+: 

:: CALL VCHAR(SDRTI ,32, 32. 2) 
H70 CALL DELSPRlTEltlO):: BOTO 630 
BBO FOR T-2 TD 29 STEP 3 :: FOR U=l TO 1 
9 STEP 3 :: CALL BCHAR IU.T+1, Z) : : IF 
2 THEN HE<<0+2)/3, 1T+1)/3)=1 
B90 CALL GCHAR(U+2,T+3,Z)5I IF Z=32 THEN 

V0((U+2)/3, !T+l)/3)-l 
900 NEXT U ;: NEXT T 

910 Y1-INT(RND»6+1) :: Y2=INT !RND«9+1 ) : : 
CALL SPRITE (#2. 140, 9, <Y1*3-2)*B, JYZtfS-i! 
*B> 

920 FOR T-l TO 5 :: API (T) =1NT (RND*6+1 ) I 
: AP21T)=INT<RND*9+1): : CALL HCHAR (API 11 
)*3-l,AP2(T)*3,95): : CALL HCHAR (API <T) *3 
.AP2(T)*3,94) 
930' NEXT T 

940 EP1-INT(RND*6+1> : : EP2=INT (RND»9+1 ) 
: CALL HCHAR(EP1*3,EP2«3,93) 
950 CALL CLEAR ;: CALL DELSPRITE (ALL) I I 
MDUV=1 tl SU=(INT(HHU+2)/3)-l i: B^SU ! 

D=l II VD(S,0)-1 






L 'INFLEXIBLE Thomson to7, to7 70, mos 



e$ TquTe ettofpe ma w e'KieJy 



Glorieux capitaine d'un sous-marin nucleaire dernier 
cri, participez a une impitoyable chasse aux cargos (si 
vous croisez le RAINBOW-WARRIOR, n'hesitez pas..). 
Jean Yves LE FRIEC 
Mode d'emploi : 

Tapez et sauvegardez a la suite ces deux programmes. Le premier 
contient la presentation et les regies, le second (;' 
SAVE"S-M") le programme principal. 




—I l& F£MM£$ SotiT 




A suivre : 

En raison de ,'a longueur 
inhabituelle du listing, 
nous passerons ce pro- 
gramme en deux tois. 



!■■■ ■-rfEEN£:.!*.a:CLi.:ufJ[.r ( TL 0,9,8 

jLlf 3 E L H ] EIENVENU 

HK r :L0CATE13,i£:PRI 

nt" l' inflexible " 

:■:■ colors, 0: pr int.- print" 



■ ats 



ent : 



!lWi5 



l- v lionimes et 19 of 

V-.-ic.r-s u ,-.ij; a lie- >-..5r-ti-- rhz^sir les co 
.--■ji; de car-gos^PRlNT" Attention, des f 

■ ■ i:!'.;; ■'!,!!■ 1 ■.: ■, " ■ '• 

.;:■ ■i:.!:iLCRi3:L!Mr:t:f:££,;Ci;'-';S^4,ii-i;':LINE!:2I7 
. M=--'£3S.£1 : 'BOKF '£;£.££.'-' £4 1,27--:B0XF 
. , 1 1 ,.■■..,;■.!) , ■;■: •;..■■:■,. n . ■ . • <■ 1 1 . :" ■ 
70 TOR 2=1 TO 56 i READ A. S, C : L 1 MECB, ft V-CC 
,A>:NEXT 2 

L-ij- FOP Z = l TQ I3:READ A. B, C : LINECB, AJ-CC 
,h>. -5:NEXT Z 
90 L IME'-£3.bii!:'-'.£f.,!57,',-5:L£!'iE':2£a,4"'-'c 

r<-.: ■>■;=■:-;.!, s -..i-.:; j HE >. 2 33 , T>1 -;235, 5>, 0: LINE 
?E4e J 21>-C£tB>5!j0 

o? lj.we'.&. 48 > ---it. t? ■. j: l rr-iE •■.="., 49 ■■->■;.,:>;■:'■■ 
.:;lin£; =.,&4j-<:5, ',.'•. ■■ ■■o--.\ : ;: ■ -:5,b9> 

, 3 : LINE ':?.5& :■-<£■ ^'7 ''.?;: LI. IE', i ,57>-Cl,58> 



710 DATA 53. 16.314.54, iu. 315. 55. 9, 315,56 

.9. 115. 57. 9, 3 15, 58. 9.3 i 5. 59. 9. 3 15.60, •}, 3 

IJ,3i. ! 3.3 13. 3£. 17.31 £.',3, £7.319.53. 11,1 

5.64.31.309.64, 11 .££.65,35.303,65. 12,££. 

=i '=-- . 39, 30 7.66. IE, it, 67.5; , ,'y=,,67. 12.31-68 

, 55, 3f=3, 33, IE, 31 ,69,63. 301. 69.1 £,£1.70, 7 

5,298 

'■£0 LViTA 70. 13. £0.71. 5! .£53, 71, 13.20.7&, 

SH,£37,7£, ;3, £0,77. ^'9, £83. 7 3 . 1 3. £0. 74 . 1 1 

1.279 

"7C L'ATh 3B.2£6,£3J.3l.££! .££5, 31.235-£3 

■ . >;3. £35, £37.33. ££1 . ££5. 34 . ££3 , £34 , 55 . 1 7 

. £7, 5':",. i 3, 16, 5!i.,; J, £5. 57. I ! . i i . 58 , 13, 14, 

59.15, 17,66. IS, 22 



taa 

110 
130 
136 

146 


COLORS 

■:. u-: : .;0; r. ;.b,?4:Cl 

PRINT:PRINT"Pou 
PPINT:PRINT"-po 




»«*- 


f.aceCe-10 Sl> 

n sonar (P>10 fh>" 

159 PRINT"-pour le 


ir 


ii , 


cle 26 t 


lie 

169 
170 

186 

136 


GOSUB60^ 

CLS--PPINT:PRIWT 

PRINT: PRINT" Or, 
J pRINT:PRINT"ATT 

.. <liie !e batiraen 


9 et 
KTIO 


da 7 mi 
CP>£0 m 


S3 


est 


-les missile 
'autartt Plus 
en profoiicieur 



; GOSUB680:CLS:PPINT:FRIN" 



310 LOCATE 0,£3,B:PRINT"On a va ?",-:R*=: 

HPUTS(1> 

230 IF R*= ,, 0" THEM LOCATE 0, 24, 0: PRINT"! 






Ie 



:L0AD"S-ft",R 

230 IF R$="N"THEN CON3OLE0: CLS: LOCATE 10 

, 16,0:PRINT"DoBma9e (": PRINT! PRINTTAB 

a0)J"flU REVOIR! ! ":L0CATE 0,23:END ELSE 
GOTO £19 

683 S*="":LGCATE 9, 24: PRINT'Tour 1 3 suit 
s., tapez sur <S> . °j : SS=INKEY$: IF S*<>"S" 
THEN 689 
619 RETURN 

799 DATS 46,104,279,41, 182, £83, 41,13,20, 
43. 191,391,42, 13,29,43,87,295,43,13,20,4 
-..SO. 397,44, 13,21,45,73,395,45, 12,21,46, 
66,301.46. n,2!.<i7,59.:i03.47,l£,£i ,V-.- .'■■. 
, 3M5.4*. 12,22.49.44, 307. 49. 12. ££. 5f. 3? , 3 
'9.50. 1 1,22,51,30,311,51, 11, 17,52,23,313 



.52,; 



,13 



. i^P L "EN£.0,0 

£ CLEAP400, r 42:C'IHT<40,£9>.i:X(14),CyC14i 

,GXC6>,GYC65,D*a0) 

3 00508609=00505517 

5 GDSUBli:G0SUB46! : GCi^i-rs:* - :.:s.s-:f: ^'-4 

:■...,:.■ ... !■ :■■■::■:■:, r ; 
i>3UB46l:GOSUB497:G0SUBU:iFP< = 19THENAIP = 
100S:PU=PU'-t-100:IFPU>60e0THENPU=6080 
7 IFP>=19THENAIP=AIR-5e:PU=PU+5e:lFPU)69 

;.■:;■ 'iifsf'o ",;:^>> 

9 G0SUB£9:GCi! ; .i.:;-"i :;■':' ■':'■; = '-'--■ 

11 COLrjR0.e:CON5OLE£l,£4:CLS;DP=B;:::O:.:::v,j 
... ,;: , .; ■; ■ ■ ^^t. J OS COLOR 

£,0:PPINT" "JR* 
13 IFR*="P"THENGDSUB85 
15 IFR$ = ' , t1''THENGGSUB157 
17 IFR*="T"THEJ*G0SUB295 
19 IFRJ="C"THENG0SUB567 
21 IFR$="»"THENG0SUB277 
23 IFRJ="A"THENG0S'JBE91 
25 IFR*= ,, 3"THEhiG0SUB45 
£7 RETURN 

E9 LOCATF.39, 5.0: COL 0*7. *:f'k 1NT;-;C:L0CATE3 
3,5:PRINTVC:U*='" 1 :rORI=LEN<i::FS<F':. :■ F04MJ 
<■ "i>"-Hf ;;:ji v.: ',■-:!',-- .:■•■->? \ (,MJt<. SI Rt.'PJ , LE [J < 
'■TFSiP.>-l^L0CATE34,B:PRIWTU*:L0CATE34, 
ll!PRINTT:L0CATE34,14:PRIWTMI 
7| EOXE'33, !.36< -'£4-. 143 
-...243-CH.IR*8>.--5e. !;-7>.-:^:>:i ■ i-v, ;:?.- >-■■£ 
J7. ]5^j.7:BOXFC83, 15£>-(£4B-CPU<50:i-<PU* 
EV380,159),-2:1FC1 = 0THENC1=OI 
3.3 L:jOHTE£, ll:C0L0R3,4:PRINTflID*(.Gt, :C1* 
3--.'-£, 3>:ll*=*" , :rOFJI = LEI>i.'r.T?!i<;£>>TO4:U*="0 
1 -0!.;-JE^TI:Ut=U*+RIGHTt(STRJ(S)-LEN(STPt 
($> J- 1 > : LDCATE2, 8: PRI NTU* 
35 COLOR 1, 3: L0CATE34,1&: PR INT "PUIS": COLO 

R3.4iUt= FOR1=LENCSTR*CPU>JTO4!US='0"* 

:is , ;'.:F:m:U*=U$+RIGHT*(STPStPU,',LENCSTffS<: 

PU)>-1>:L0CATE34,17:PR1NTU* 

37 IFBA<=0THEN641 

39 IFAIRiieTHENCLS:PRINT"Eo|uipage asph 3 ^ 

ie, ,, ;N*iG0TO641 

41 IFNF=1THENF0RH=1T0 5: LIME<14, 5J-(1S, 5 

^HP*a27>,l:PLflV ,, A0T5O5L48SI":LINE<14,5 

;.-fi.8.s;-CHR*(lE7-. .5i;^:>:r;^:. :m^ ;•!,;: • ,:* 

. r . 'CHR*tl27>j 1ELSELINE<14, 5>-<18,5)CHRH 

127>,0 

43 C0L0R2,BSRETURN 

45 NF=8: IFrK7) = lTHEfieLS:PLAYCL*:PRINTD$( 

7)JEN«:G0SUB69:CLS!RETl(ftN 

47 IFEK5)=lflMDRNP<.5THENCLSiPLAYCL*:PRIH 

TDtC5>;EN*;W*:G0SUE69:CLS: RETURN 

49 NF=8:B0XF<64,56>-t:£63, 127), 0: BOXE (12S 

,56>-(i99, 127),4:COLOR0.4:LOCATE20, 11,0: 

PRINT" + "JFORI=-4T04:FORJ=-"4T04:IFXC + I :i0 

RXC+IM8THEN67 

51 IFVC+J<1ORYC+J>20THEN65 

53 H7=XC+I:Y7=YC+J 

55 IF T<X7,Y7X1THEN65 

57 ON T(X7,Y7J GOTO 61,63,61,59,65,65 

59 NF=1 

61 L0CATE29-t-I,lH-J:PRINT"*":BEEP!G0T065 

63 L0CATE2B+J,n+J:PRIKTCHR*a27) 

65 NEXTJ 

67 NEXTI:PLAYCL*)C0LOR2,8:RETURW 



69 F0RG=1T0789:NEXTG:RETURN 
71 CLS!PLAYCL*:PRIHTN$; "Voulez-vous com 
ertir de l-energie"; :R*=INPUTf < 1 >: IFRJ=" 
0"THEN73ELSERETURN 

73 IFF0< = OTHENCLS:PLAYCL*:PRINT ,1 C,in','sri-i 
or impossible"; N*:GOSUB69: RETURN 
75 ;ILr.:PRINT"Quantite disponitile :";FUJ B 
litres"!M$: INPUT"9uantite a conuertir :" 
:F3!IF F3>FU THENCLSiPLAYCL*: PRINT" II ne 
rste que":FU;'litres";N*iG0SUB69:G0 10 75 
7 7 F0=F0-F3:PU=PU+F3*£:CLS:PRINT"Convers 
,:.-•'.-..-.:,..,,,?- ;N$:PRINT*Puissance dispo 
nible : "f PU: G0SUB69: G0SUB29: RETURN 
79 IEPM8THEN83 

SI !F0(3>=8 THEN DP^l : DI=C1 : GOSUBSS: P.L '■■: 
RN ELSE B0XF<64,56>-':£63, I 37 ^, 0: RETURN 
£3 !n>.::?> = 0THENGOSU845:RETURN ELSE BOXFC 
64,56>~C263, 127 >, 9 s RETURN 

85 NF=B: lFD(8>=lTMENCLS:PLAYCLt:PRINTD*( 
B>!EN*;N$:G0SUB69:RETURN 

87 IFPM.0THENCLS:PLrtYCL*:PRINT"Trap prof 
or.d !■■; Ns: G0SUB69: RETURN 
39 IFDP=1THEN95 

91 COLDR2,0:CLS: INPUT"DIRECTI0Nt.l-8> "JR 
*:D3=Dl!DI = ItlTCVftL<Rt>) 

93 IFDK1 OR DI>8THENDI = D3:CLS:RETURN 
95 B0XFC3, 7>-(3£, 11 >CHRfC 127), 6: B0XFi!8,i 
E;-(3£, 15JGR*(37>,7,4 

97 G0SUB99:C0L0R2,«: IF DP=I THEN RETURN 
ELSE 91 

99 C0L0R9, 6:LOCftTE19,3.0:PRINTPIID3>v:,;t , ([■ 
I*3>-£,3) 

101 ON DI GOTO 193,119,183,119,103,119,1 
03,119 

163 T r"ORI=4T01STEP-l:R=-l:FORJ=-I TG HX1 
= -iC-J*(L'I = l ) + .j*('&I=5:i-I*<DI = 3;' + 1 + CPI = 7j: 
Yi=YC--I*<DI =5 > + !*<: L'T = i >-J*<.L'I=31+J*(DI = 7 



5 THEN 117 

S97 IF ([11 = 1 OR &I=5> THEN IF CXK6 OR >I 

l>40) THEN R=R+l:00T0115 ELSE 111 

199 IF (DI=3 OP DI = 7> THEN IF CYK0 OR Y 

1>£0> THEN R=R+l:G0TC115 

111 R = R+i; !FT;^i,Yi:.=0 OP TCX1,Y1>=6THEN 

US 

113 GOSUB 145 

115 NEXT J 

117 NEXT I: RETURN 

119 FOR I=4T0I STEP- I : R=- i : FOR J=0TOI-!:X1= 

;<c-.jH(<:c.r=£;.+.j*i;c'i=o^-i#!.oi=4>i-i*.:[.'i=s:': v 

l = VC-I*(DI=/.i + l*i.C'I = £ i-.j-*ilM=4;.-i i*- ■:■(■! =■>:> 
121 IF(.DI=2AWC":XI>40 OP Y1<0> >0R<PI=4AHD 

(Yi>£8 or >:!;■-■!?'' ;.>.iS'-:.L'j=6ijK!...::-:Me op vi>£ 

0>iORi:DI=3ANl>CYl<0 OR XK0)!'THEN1£9 

1£3 R=P + l:IF T<:Xl,Yl)=e OR TCX1,Y1>=6 TH 

EN1£7 

125 GOSUB 145 

127 NEXT J 

129 NEXTI 

131 F0RI=4T01STEP-l:R=I-l:F0P J=-I TO 9: 

Yi=vc-J*<:Di=£n-j#a.r=bJ-i*:.C'i=4: n*-:i?j-3 
•j!Xi=:'iC+i*<[:.]=6;-i*fDi=£)+j*(Di=4)-J*(Di 

=8) 

133 IF<DI = £^u: ■. ; i?.yXi.;bl ■•n-.m-:i; • f- : 

I=6ANrjXK0)OR<DI=8ANDYKB)THEN143 

■:i:-T-; ■■(!-ssj a -a*: ;:; ^i f.-'. ■■■:;■■■" 

0> OP CDI=6 AMP YI>£8) OR (DI = B AND XK0 

', THEN R=R+liGrjT0141 

137 R=R+l:IF TCX1,Y1>=0 OR T(X1, Yl >=6THE 

(4141 

141 MEXT J 

143 NEXTIiRETURN 

145 LOCATE 8-«8*< I = l>+5*a=2> + 3 . 5*( I = 3) + 

E.7*CI=4>>*R,11,0 

147 ON T(X1,Y1> GOTO 149,151,153,155 

149 PRINTB*CI>:RETURN 

151 PRINTI*!l>:RETURN 

153 PRINTC*CI>:RETURN 

155 PRINTF*CI>iNF=l:RETURN 

157 IF P1=0 THEN 161 

159 FO=INTCRND*1098>+100 



161 LOCATE0,2£sPLAYi::i--f sF-P.lMT'Tond a ";F0 

; "metr-es "; NJ: G0SUB69 

163 IF P>F0 THEHCLS!PLF1YB0*!PRINTW*; '■''tc-.j 

PRINT"L-eau s-" engou f ire. ...ADIEU !! " = GOT 

B641 

165 IFNH<20THENPLAVrLs:,;!_i:i L -RIr.ii "Pas ass 

e- d'h0KB,es i»o'jr controler les moteurs".: 

N:S:f:,O r i!..'369!G0T0£49 

16? Pl=0=IFlM:l0> = iTHENPL«YCLj:CLS:PRll1TR 

ICHTtCD*, O;;EKJ:"!S-J'J03Lie69: :G0TO£49 

169 IFD<:3) = lTHEWPLAYCL*:CLSsPRIWT"Heli.:e 

endoniBiaoiee, dep 1 acemer t imposs itol e".: WJ: G 
OSUB69JG0T0249 

171 IFDf4i = lTHEMPLHYCLt: LOCATES, 22: '--ft! II i 
M ] r..s .' Pi j 3 i , i e -■ ? E MS : N I- : 00SUE69 
173 C3=Cl:CLS: INPUT "Cs;:.-: I -S; ";'ris 
175 CI=VALvf-*:. : lF01.fi 0RC1 > bTHENC 1=C3: RET 
URN 

177 IFPU<180THEWPLnVCLIMCL'-':pEINTN*: "llan 
oeui/re i mpossible" : PRINT"Puissance insuf 
;,•-■,' I.-": :C;jl : ;.'L^ r:C;0Vi-.7 : 

179 CLS:PRIMT"Puissan.:i >;i iifon ible"; PU: I 
NPUT"Puissance 3 uSil i;er";Pl 
181 IF PK0 OR P1>PU TKEN179 
183 GOT0E49 

185 IFPK189THENDI=C1:P=P3:P1 = 0: 003^03^: 
G0SUB79: RETURN 
18? IFPK = 1898THEN193 
1S9 IFRND<.4THEN193 

l a l CLS:PLAYCL*+CL$:PRINT"Pilt a ton. ].■=•«£ 
: nasse cr i tia,, je ! ! " : PR ] NT "Ewac '-.a 1 1 en ii«ra 
ediate clu sous-mar in" J NS: G0TO641 
193 X=XC:Y=¥C:P4=P 

195 PK=INT<Pl.'199 + .5):P5 = <P3-P>-'Plt 
197 F0PX2=1T0PK 

:-■■-■■■ iFS-i-C^i'Cj ;■ .■0-;:i^.:.-t:;- CI.. ■ 4H<N[:'Y-i-[jV! CI 
>:-0ANl>Y+DY(Cl){2ITHEN2e3 
£ui PLAYCLt:CLS:PRINT"Itiipossible fitter 

?:one ,l !N*:G0SUB69:X2 = PK:G0T0£33 
£03 ON Tc!X+DXCCl>,Y+DY<Ci:0 + l GOTO 205,2 
19, ££5,229,229, ,345 

265 K=X+DS«C1 >:Y=Y+OYCC15ipa=PJJ-108: I FPU 
<0THENPU=0 
£07 P4=P4*P5 
£09 IF TO!,Y>>l THEN T ■.■;;, V :• =T<-Ji, Yj -5: GOT 



£13 IF T'.XC.YCHO THEK T< >!C, YC > = T-:XC, YC- :• 

*5:G0TO217 

215 T(XC,YC>=0 

£)7 >;(»;: YC=Y: P=INT<:P4 .'ji ; : 

GOT0333 

219 IFP4>=30THEN305 



£21 



; THEN 



>39 



223 CLS:PLAYB0t:PRINTWJ.: " Vous uene; d 

,:oules":G0T0641 

r-1 ! •: G0SUB69: X£=PK: GOT0333 

£37 P=P3:RETURN 

EE9 IFP4>=£0THEN£05 

231 CLS:PLAYBOt:PRIWT"Vous venez of'epero 

nrrer un bateau , uous coulez tous les de 

ux, "iNf:BA=BA-l: IF BA=0 THEN 597 ELSE64 

£33 PLAYCL*:«EXTX2:PLAYCLt 

235 ClS:PRINTN*J "Mission accomp I ie" : PR IN 

T"Puissance disponible";PU 

£37 GOSUB69:GOT02£7 

239 CLS:PLAYCL*!PRINTN*;"Art-iKage rawita 

illeur O.K. ":PRIWT"CharcieBent et r-epar-at 

ions O.K. ":G0SUB69 

241 FORI = lTG10:Da)=0:NEXTIiPU=6i;K'; F=2B 

:NH=108iAIR=1088:ni=3:FU=1300 

£43 X£=PKiGOTO205 

£45 IFP4>=20THEM205 

£47 CLS:PLAYBO*:PRINTNJ;"Vous aveJ touch 

e uns mine,yous coulez ! ! " : G0T0641 



A SUIVRE... 
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178 RETURN 

179 REM ALRRME MUNITIONS 

180 IFCC=1THEN1B4 

181 PL0T?,24.12:PLOT8,24," WWW"ip 
L0T12,24 J 3^CC=1 P0KE#39E.192 

182 S0UND1, 0,15 = S0(JND 1,99,0 PLhYI 
,0,4,70'WRIT60'PLHY0,0.0.aPOKE(t30 
E,127 

183 RETURN 

J64 IFMU>24.2THEN233 

185 RETURN 

186 REM HLflRME ALTITUDE 

187 IFffl--£00THENPLOT7,20 ■:'\,r- : 
20.18GOTO193 

188 IFBB=ITHEN191 

189 PL0T7 J :?>3, 1£ PLO!i5 :> " !,j- ■■ : - 
,.OU£, ^,^: : :S"). '■■-■ 

190 SDUNDl.^15 StiUH['L,99,0 = PLflVl 
,0,4.70 :Hfli :'■--.--■- «v«.>?!..Si,9iPOKE#30 
E,12? 

191 IFHL=159THEN233 

192 RETURN 

193 PL0T12.29, 16 ■■ PL0T13, 3d, <i- PLUI 
...:..■■■ :....! ."i ■ i ..<■. : ■■ ' (.:■■■.■■. 

194 REM TfiBLEftU O'HriHHRIP 

195 CI.S -PRPfRSi INK0;P1NG 

196 PLOT0.1.E1 :PLOT0,2.17 

197 PLOTS, i .4: PLOT; £i,l . 10 = PLC I'i 1 , 
1." TABLEAU D'HaNI4EUR"iPLIJT29, 1,4 

198 PL0T5.£,4 = ;-l..i:iTli7i.;-, 1 i-t = PI ■> 1 ! ! . 



2," tableau d'hqnneur" ; plot2'?, 2, 4 

!99 plot;;- :. ' ,■■.■■■(=■■■..=-(-,, -..,:-.. . „■■ 

209 PL0T2, 7, "2. Commandant..." 

291 PL0Ti:,9."3.r;-.i„r l ,.„,(Jant.. ." 

■;■-•-- i y : (:■■>■;:. i: ■ ■-.. ■■.v^-,>.-s« -.-; . . 

203 PL0T£, 13, ,, 5.C.Wi9i-,.Jar.t. . . " 

2Ci4 Pi.0T3.25 ;j.i'-F!..OT! ■ 25 . S 

295 PL0T5.25. "VOTPE HnM r;ij=-- ;=.. .,:.(, 
T " 

206 IFPEEM. *f-*;-X: ==■■= i i-S-Hf ■!'-;--■-.! '■ . 
25 = PRINT = POKEt" i ,', A', ■ GOJiy^OS 

297 PRINTi-28,25. 

208 P0KE618. 11 IHPUTMS 

20=* PLOTl.25,6 

£11* FORI = 1T05 

2! 1 IF--SOTW i ^THEHili-J 

212 He:»:Tiijjrij222 

213 FORJ=5T0ISTEP-l 

214 TA^J>=TA<J-1 3 = CSC J >=(-:$. .1-1 :■ 

215 NEXTJ 

£16 Tfl£ I }=3C CSv I >=" Comma -,■, 
+H* 



t. . " 



7'i" FOKE#26fl.. 13 

218 PAPER4 

2 1 9 FOP I = 1 T05 1 plu T4 . 3+: ?.t. i '. ■ C$. l , 

:PLOT26.3+<2*3 >,STRS<TA< I >J 

:?-:£o PLOTSv, :.?+■■ I-*i ;, "vir ^. : .;r -^j.-' 
221 NEXT I : I FSO 1 ?'l HhlJ22i)i:L.i:L-:22i3 
£2£ F,;rpi = !T0'=, : -■FTic- i :'^--THF;f-l2-'^ 

223 HEXT 

224 GOT021? 

225 iCE. I ^"Comr^.nd.snt. . "+(■)=!•= IF!.. I 1 
=SC:GOTG217 

226 PLOT0, 24)20 'PLOT 1,24, 3 

Hi- 

228 CETPS:GOSUB157 1 GCiT07 



£29 CSd >="GENERAL "+N* 

230 PL0T4,S,C«1) 

231 G0T0226 

232 REM FIN DE PARTIE 

233 POKE#30E. 192 

234 PLAY1,0.0,0;H=15=FORI=0TQ15:F 
0RJ=298T058:;-r-r--- <a:-'.C: i ....,, ■;b/.' 
J 

235 H=H-1>MEXTI 

236. PLOTie.lS.'TIN DE" =PL0T16, 20, 
"MISSION" 

237 PLAY1.0, 0,0' H=l5 'FORI "0TO15'F 
ORJ=200TO503TEP-20 i 80UND1 , J. H ■ NEXT 

238 H»H-1'NEXTI 

239 WAIT100 

240 GOTO 195 

241 POKE#30E,192 

242 PLAY7,0,0,0 = FORI=>0TO400STEP30 
= FOR J= I TOH-50STEP7 ' SOUND) , J, 15 

243 WRIT2:SOUND2,JH0,15<NEXrj,I> 
PLHY0,0,0,0=EXPLODE 

244 PLGT16,18,"FIN DE" = PLDT16, 20, 
"PlISSION" 

245 WAIT190 

246 GOTO 195 

247 REM CODE MACHINE 

248 FGRI=#4#0T0#430 

249 READA* : DT=VALt "#"+A«* 

250 P0KEI,PT 

251 NEXT 

252 IFPEEKC#FFFE)=40THEN257 

253 DOKE#403jttD8CB 

254 DQKE*41B,tlF590 

255 DOKE*42C,ttDF0F 

256 DOKEI^FjItDFeEi 

257 L:.;.KiJ3R=#400 




261 REM GRRPMIQUES ' 

262 RE'HDC* = X=#B400+8*ASC< C» ) ' IFC* 
="FIN"THENRETURN 

263 F0RX=XTOX+7 ' REAUC ' POKEX. C ■ HEX 
T 

264 GOT0262 

265 REM 

266 REM DATA C MACHINE 

267 DATA08 J 78,20,10,D8.eA,29,33 

268 DATFl4A,4fl,4A,4e.8A.29,07,AA 

269 DATA18jA9.FF.2R.CA, 10, FCAA 

270 DATAA9,0E,20,35.F5,68,09,1O 

,;;•; CfM-y .:-;,, -;,..;;:, ,'=:;.:■.;,;:■.: •.** 

372 DATA03, F9, 03. 4C00. DF, 4CFC, D 

E 

273 REM**** DATA GRAPHIQUES **** 

274 DATA^;, 9.9, 0,9, 16,8,7,9 

275 DATA-. 1,1,3,7,7.7,63,3 

Zm DHTfii: . 32 , .2 , 4S , 56 . Z:f. . 5U,.. ^'. . n 

277 [■RTA_,rt.O,0,l : i,2,4,56,i-i 

27P DATAij. . 63, 63 .63,63. 6C: , 63 , 63 , 63 

279 DATA< , 0.0, 0, 9,32. 31 , <J), ij 

2>:>) OfHIHk .0, 12, Uti.'i.j.CJ. e;.":. ;:n, li 

2^1 t'ATH>,SJ,e,0,P). 1 ,S2,£i,li 

21:.7 CUTlU, L'3,r : .V.. l^-5:-i,2:-. lH.,.^..f. ti 

£:^.., [■■PiFHi , l£, 13,7y ; .i^.4:o.r...:; 3 . ,;:;• 

£34 [)ATA>,3Ci. 33, 33. 45.45,3'?- 12. 1 ,'■ 

£85 C'ATAFIH 



PANGOO 



Epopee glaciale d'un pingouin maniaque, qui s'obstine 
a vouloir aligner 3 malheureux diamants. 



# M twit 




960 MH=VO(S,D):: MD=HEIS+1 


D> : : MG=H 


D!:: MB=VD(S, D-l ) 




970 IF M0UV=1 THEN VU1=MH 


: VU2-MG 


U3=M0 




980 IF M0UV=2 THEN VU1-MB 


: VU2=MD 


113= ME 




990 IF M0UV=3 THEN VU1=MD 


: VU2=MH 


U3"MB 




1000 IF M0UV=4 THEN VU1=M8 


: : VU2=MB 


VU3=MH 




1010 COLL COLORd.16,1,8, 1 





070 

O SDSUB 1310 

BAN=BAN-1 :: DISPLAY AT (23, 1) SIZE ! 1 
"ENERBIE" iBAN :: IF BAN<=0 THEN 1920 
IF D!l THEN 1590 
IF D>10 THEN 1970 

CALL CLEAR i : CALL DEL5PRITE (#1) : ! 
GOTO 960 
C70 EC=4 :: FOR T=13 TO 21 :: EC=EC+1 : 
CALL HCHARIT, 16-EC,33) : : CALL HCHARIT, 
6+EC,34) : ! NEXT T 
10BO CALL VCHAR<4, 12,35, B) ! ! CALL VCHAR( 
a, 20,39,8):: CALL HCHARf 12, 12,36) : : CALL 
HCHAR(12,20,37):: CALL HCHAR (12, 13,38,7 



1250 CALL HCHAR 
1260 CALL VCHAR 
(14,23,36) 



1.96,8,140, 116):: GC 
1280 
1310 REM PROS PRINCIPAL 

1320 GOSUB 1640 :: CALL JOYST (2, X, Y) : : 
ALL POSITION(*1,A,B) 

1330 A=A-Y*2 :i B=B+X*2 :: GOTO 1430 
'1340 CALL GCHARI IA+20J/B, <B-4)/S;z"):: 
LL 6CHARI (A+201/B, (B+20) /B, W) : : CALL E 

1350 CALL BCHAR((A+20)/a. IB* 

V>92 THEN 1400 ELSE IF V>33 
QUNDI-1. 660.0):: GOTO 1320 
1360 IF Z>92 THEN 1400 ELSE 

1420 
1370 IF W>92 THEN 1400 ELSE 



1550 IF MDUV<3 THEN D=C 
LSE S=S+IMOUV-4+M0UV-3) 
1560 IF MOUV-3 DR MOUV= 

■MDUV-1 
1570 RETURN 
15B0 RETURN 

1390 CALL CLEAR :: CALL DELSPRITE (ALL) : : 
DISPLAY AT(4,l)l"VDUS ETES BORTI SAIN E 
T SAUF BU l-AB 

YRINTHE. .." 

1600 IF D>10 THEN 1980 

1610 SCO=SCQ-I00 :: CALL SOUND (2000, 660, 
0):: 01SPLAY AT ( 16, 1) : ". . . MAIS DU MAUVAI 
3 COTE..." i: CALL S0UND(3O00, 1 10, 0) 
1615 IF SC0<O THEN SC0=O 
1620 DISPLAY AT (24,4) : "FIRE POUR CGNT1 



ER" 



_ KEYC 



IF t 



THEN CALL S 
F Z>33 THEN 
F W>33 THEN 



1 CALL HCHARd, 1,42,96) : : CALL HCHAR ( 
22,1,42,96):: CALL VCHAR (1 , 1 ,42, 48) : : CA 

'. VCHAR(1,31,42,48) 
1100 FOR TU=1 TO 3 tl IF S=AP1(TU)AND D= 
AP2(TU)TH£N CALL HCHAR (16, 14, 95) : : CALL 
HCHAR (17, 14. 94):: GOTO 1120 

110 NEXT TU 

120 IF EP1=S AND EF2=D THEN CALL HCHAR ( 
15, IB, 93) 

130 DISPLAY AT(23,1>SIZEU1):"ENERGIE"; 
BAN 

IF VU1 = 1 THEN 1150 ELSE 1190 
1150 CALL HCHAR (12. 13,32,7):: EDM :: FO 
R T=10 TO 12 II EC=EC+1 :: CALL HCHARIT, 
:,33):: CALL HCHARIT, 16+EC, 34) : : NEK 



1390 [ 



.BBO.O) 



DISPLAY I 



: CALL VCHAR (: 
SC0=5CD+BAN*H 
OJ^'ENERGIE";! 



L 320 



1. 320 



■~2V 



i CALL VCHAR14, 12,32,6 

>,32,B) 

i CALL VCHARI4, 15,35,6 

',39,6) 






> CALL VCHAFU' 



/3 AND D=H 
CALL VCHAR 
THEM 12O0 ELSE 



CALL VCHARI 

CALL VCHARI 

O THEN CALL 
17.16,64) 
230 
■ CALL HCHAR I 



CALL HCHAR<15,9, 
12):: CALL HCHARd 



ITI23,1)SIZE 
AN :: API (TU) . AP2 ITUJ^O It GOTO 
1400 IF EP1=S AND EP2=D THEN EP: 
: CALL SOUNDI-l, 880,0) i : CALL HCHAR 
B.32):: GOTO 1320 ELSE 1390 
1410 CALL LOCATEIttl.A.B):: GOTO 
1420 CALL SOUNDI-l, 660,0):: GOTO 
1430 IF A<=70 THEN 1480 
1440 IF A>=148 THEN 1550 
1450 IF A<=12B AND B>=192 THEN 1510 
1460 IF B<=12B AND B<=44 THEN 1540 
1470 GOTO 1340 



1490 IF M0UV:3 THEN MDUV=MDUV+2 ELSE IF 

M0L1V=3 THEN MOUV=2 ELBE MGUV=1 

1500 RETURN 

1510 IF M0UV<3 THEN S=S- < MDUV- 1 +MDUV-2 > : 

: GOTO 1490 ELBE D=D+ IM0UV-4+MOUV-3) : : I 



• IB THEN RET 

-'RITE (ALL) 
CALL VCHARI 

: CALL HCHAR I 

: FOR U=l TO 
, IT+1)/3)=1 T 

=1 THEN CALL 



M0UV=1 :: CALL CLEAR 
1630 GOTO 1620 
1640 CALL KEY(2,R,P>:! IF 
URN 

1650 IF BAN<2 THEN RETURN 
1660 CALL CLEAR :: CALL DELSFi 
1670 FDR T=2 TO 32 STEP 3 :: 
l,T, 42.221 i: NEXT T 
1680 FOR T=l TO 22 STEP 3 II 
T, 2,42. 31):: NEXT T 
1690 FOR T— 1 TO 29 STEP 3 r 

19 STEP 3 : : IF HEI(U+2)/3 
HEN CALL HCHAR<U,T+1,32,2> 
1700 IF V0KU+2I/3, (T+l)/3> = 
VCHAR (U-H.T+3, 32, 2) 
1710 NEXT U :i NEXT T 
1720 IF MIN0=1 THEN CL=9 ELSE CL=2 
1730 CALL SPRITE (#1,96,8, (3*S-2)*8, 13»D- 
1)*B.#2, 140, CL, (Yl*3-2>*8, (Y2*3-1)*B) 
1740 FDR T=l TO 5 :: IF AP1(T)=0 OR AP2 I 
T)-0 THEN 1750 ELSE CALL HCHAR (API (T) »3- 
l,AP2(T>»3,95): : CALL HCHAR (API IT) *3, AP2 
(T)«3,94) 
1750 NEXT T 

1760 IF EP1O0 THEN CALL HCHAR (EP1 *3. EP2 
*3,93) 

1770 CALL KEY(2.K,J)!: IF K=18 THEN BAN- 
BAN-2 :: CALL CLEAR :: CALL DELSPRITEIAL 
L):: GOTO 960 ELSE 1770 
17BO RETURN 
1790 CALL KEY(2,L,P):: IF L=1S AND EPl-O 

AND BANi-4 AND HINDOO THEN TU- 1 
1BO0 CALL SPR 



1810 IF TL 

1S20 CALL SPRITE(#1,96,10,154, 124) 

■ CALL SGUNDI600, 440,0) :: CALL SOUND I 
200,330.0):: CALL SOUND (200. 220, 0) : : CAL 
L S0UNDI1000, 110,0) 

1840 FOR T=l TO 500 :: NEXT T :: CALL SO 
UND(-l,-7,0):: CALL DELSFRITE (#1 ) : : FDR 
T=l TO 300 II NEXT T :: CALL CLEAR ;: CA 
LL DELSPRITE(ALL) 
1B30 DISPLAY AT(12. 1) : "TRISTE FIN..." :: 

DISPLAY ATI16.1) J". . . ETRE DEVDRE PAR LE 
MINAUTORE ..." 
I860 GOTO 2030 
1B70 CALL L0CATE(*l,147,U/-> 
1880 CALL SOUND (-1,-7,0) : : CALL HCHAR ( : 
,16,93):: CALL COLOR (B, 6, 1 ) : : FOR T=l " 

100 :: NEXT T 
1890 FOR 1=1 TO 10 :: CALL SOUNDI-l, I*: 
0*10,1+5):: CALL COLOR 1*2, I+4J 
1900 CALL C0L0R(#3, 1+4, #4, 1+4,(15,1+4) : : 

1910 FOR T=l TO 500 :: NEXT T :: CALL HC 
HARUS, 16.32):: CALL DELSFRITE (#2, #3. #* 
#5. #6):: SCD=SCO+100*BAN :: BAN=BAN-2 : 

MINO-0 :: GOTD 1320 
1920 CALL S0UNDUOOO,44O,O)i: CALL SOUND 
(300.33O.0):: CALL SDUNDI300, 240. O) : : CA 
LL SOUNDI200, 170,0) : : CALL SOUND 1 1000, 1 1 
0.0) 
1930 CALL CLEAR :: CALL DELSPRITE (ALL) : : 

DISPLAY AT112, 1) : "PLUS D' ENERGIE. . . " 
1940 DISPLAY AT 1 16, 1 ) : "MAIS VOTRE SCORE 
EST. TOUT DE MEME DE"JSCO 
1950 DISPLAY AT(24,1):" . FIRE POUR REJ 
□ UER" 
1960 CALL KEY(2,R,S):i IF R=18 THEN 110 

1970 GOTO 1590 

19S0 CALL S0UNDI2000. 660,0)t 

1100,550.0):: CALL SQUNDtiOO,' 

LL SOUNDUOO. 550,0): : CALL SOUND 1500, 440 

1990 DISPLAY AT (B. 1 ) : " . . . ET DU BON C 
DTE " 

2OO0 IF MIND=0 THEN DISPLAY BT(l*t,lll' 
VOUS AVEZ TUE LE M1NAUTAURE" 

SE DISPLAY' AT (IB, 11 : "MAIS HELAS SANS ( 
IR TUE LE MINAUTAURE" 

NC >BONUS DE 500 PTS" ELSE DISPLA' 

T(16,l)! "DONC >SORRY NO BONUS" 

2020 IF HINDOO THEN SCD=SCO+500 

2030 DISPLAY AT (2Q, 1 ): "VOTRE SCDRE":SC 

2040 GOTO 1950 



CALL SOUND 



1490 



1 . ! 31 



1,9,1- 



THE STRIFE ~ii^^^F XELV ' SION - EXL 10 ° 



USA (avion) 
voire camp... 



contre URSS (sous-marin), choisissez 



J.F SORTINO 



Mode d'emploi : 

Se joue k deux belligerants et necessite les deux manettes. Les 

regies sont in cl uses. 



We n wit /wx 
#$£, FACB t oevMsJ 



it y /s utJE Fffl's eT 

QEMi pus 6£ CON'S 
J>i/$$ES <?i/E 

AMEpfcA'VS- 



THE 



1FE 




LE CONFLF 

LE 20/2/85 

POUR I EXL 100 

I BASIC. TMS 7020 

;ATEUR: SORTINO JF 



+DEFINITION DES SONS+- 



15 RANDOMIZE 



:"OBA02163031B1800BD1E139840073A108100F0901E810804807BF084420020570'' 

•110840704E118B40043CE0010F78C00316B080Q52C20010348800214AOOO" 
"05280000000052BOOOFC" 



■0000924C4CD5184C2B10" ) 
'OFOFC7E7FF7F07070FOF" ) 
'BOCOEOFOFEFFFOEOCOBO" ) 
'01 000003077FBFFFE!F7F ,, ) 
'BOBOBOEOFOFCFEFFFEFC" > 
0703070F1F42FF7F3F1F") 
'OOSOCOEOFGOBFFFEFCFB" > 
'0103070F7FFFOF070301") 
'F0E1E3E7FFFEE0E0F0FO" ) 
,'•00000038363838 100000") 
, "'103838383BOOOOO0O000" ) 
i"3C1B18B1DBDE811B1B3C" ) 
, "800000COEOFEFDFFFDFE" ) 
."010101070F3F7FFF7F3F") 



TION VARIAE!LESt + + + t 
5;R=17iT«15iQ=9:5=2O:S1=OiS1=0iGT=: 
PRESENTATION N01++*+*+ 



! * + 


+ ..DEFIN 


CALL 


CHAR ( 1 . 


CALL 


CHAR(2< 


CALL 


CHAR (3, 


CALL 


CHARC4, 




CHAR(5, 




CHAR (6, 


CALL 


CHAR<7, 


CALL 


CHAR(8, 


CALL 


CHAR(3, 


CALL 


CHAR<10 


CALL 


CHAR<11 


CALL 


CHAR(12 


CALL 


CHAR (IE 


CALL 


CHAR (14 


! " 


ntDEFIN 



40 

iLOCATE (Z.E)iPRINT CHR*(0> 

(Z,E)iPRINT CHR*<23> 



i CALL CQLORC-OYB") 

5 CLS "RBB" !K=12iL=1 iZ=12 

J LOCATE (K,L)iPRINT CHR*' 

' L=Lt.5iE=E-.5 

I LOCATE (K,L);PRINT CHR*(25> 

! IF K=Z ANO L=E THEN GOTO 183 

> GOTO 4E 

++*PRES£NTATION N02+*++t+ 

. CLS "RBB";CALL COLOR C "ORBHL" ) 

; LOCATE (10,10>iPRINT "TTHHEE SSTTRRIIFFEE" 

I CALL COLOR("0GBHL")iL0CATE ( 1 1 , 10 > iPRINT "TTHHEE SSTTRRIIFFEE" 

' CALL COLORCObB") iLOCATE < 13, 15) iPRINT "LE CONFLIT" 

I PAUSE 3 

! CALL C0L0RC1YBH") iLOCATE 

) LOCATE (16,5) iF'RINT "VOULE; 

I A*=KEY* 

! IF AS="0"THEN CLSiGOTG 6G 

t IF A*="N"THEN 75 

I IF A*<)"N"AND A*O"0"THEN 53 

> ! +++++FICHE TECHNIOUE++t+*+ 

i CALL CQLORCOMBL'^iLOCATE (3,10)iPRINT "TTHHEE SSTTRRIIFFEE" 
' CALL COLORC'IRE") 

i CALL COLOR ("OGB"); LOCATE (7,3>iPRINT "UTILISATION DES 2 I 
( CALL C0LOR("OCB")iLOCATE <9,3>iPRINT "AVION : MANETTE AVEC BOUTON ORANGES 
) LOCATE (10,3)iPRINT "SOUS-MARIN I MANETTE AVEC BOUTON BLANC" 

I CALL C0LOR<"ObB")iLOCATE (12,3>iPRINT "CREATEUR : w* SORTINO JF »*" 

i LOCATE (14,3) :PRINT "(C) SORTINO JF . LE 20/2/85" 

) PAUSE 10 

I ' ++++++REGLE BU JEU*++(+t 

5 CLSiCALL COLORC'OYRLF") 

"> LOCATE (1£,5)iPRINT "VVOOUULLEEZZ- -VVOOUUSS LLAA RftEEGGLLEE" 

' A*=KEY*:IF A*="0"THEN 78 ELSE 35 

1 CLSiCALL COLOR ("OWRFI") 

I LOCATE (5,11>iPRINT "REGLE OU . 



) CALL I 

I PRINT 

! FRINT 

I PRINT 

■- PRINT 

i PRINT 

i PRINT 

' PRINT 

i PRINT 

J FRINT 



:FRINT "UN CONFLIT REGNE : 
DES BATEAUX CHARGES DE DROGUE" 
TRAVERSE L'ATLANTIOUE VOUS" 
DEVREZ LES ABATTRE,MAIS VOUS" 
NT "ETES DEUX LES USA ET L'URSS." 
NT "VOUS MAROUEREZ 10 POINTS PAR " 
NT "BATEAUX TOUCHE ET 5 PAR ENNEMI" 

NT "TOUCHE " 

NT "USA I AVION. *»k*URSS ; 5-MARIN. ■***" 
NT TAB<5>; "BONNE CHANCE ! ! !....." 
(7>;"APPUYER SUR UNE TOUCHE" 



♦♦♦♦PRESENTATION JEU+- 
94 

35 CLS "BbB ,, iCALL COL0ft<' 

36 CALL C0LOR("1BC") 

37 FOR A=1 TO 9:L0CATE if 

98 NEXT A 

99 CALL CDLORC'IYB" ) 

00 FOR 1=1 TO 4O:L0CATE 

01 CALL C0LORC"1Gb") 

02 FOR 1=1 TO 12:L0CATE 

03 FOR 1=20 TO 21 iFOR A= 

04 NEXT A:NEXT I 

05 CALL C0LDR("1BC">iL0CATE (X, 1 
OG LOCATE (X,Yi-1) i PRINT CHR* (3) 

07 LOCATE (Q,S>iPRINT CHR* (6 ) i LOCATE (Q,S+1 
OB CALL C0LUR("1Bb"> 

03 LOCATE (R,T)iPRINT CHR*<4 > iLOCATE (R,T*1 
10 I 



) iPRINT CHR* 



iPRINT CHR*(7) 
iPRINT CHR*(5) 



CALL KEYKA, 

IF A=»123 THEN GOSUB 129 

IF C=123 THEN GOSUB 135 

IF A=131 THEN GOSUB 141 

IF C=131 THEN GOSUB 147 

IF A-32 THEN GOSUB 153 

IF C=32 THEN GOSUB 168 

TE=TE+1:IF TE=GT THEN GOTO 18E 

CALL C0L0RC1YR") 

LOCATE (20,5);PRINT "USA :"[S1:L0CATE ( 20,31 ) iPRINT "URSS 

LOCATE (21,17) :PRINT "TIME :";TE 

CALL COL0RC"1BC") 

LOCATE (Q,S)iPRINT CHR*( 0) :LOCATE (H,S*' 

LOCATE <Q,S):PRINT CHR*<6) iLOCATE <Q,Sf 

IF S+1=40 THEN LOCATE (0,S) iPRINT CHR* ( 0) iLOCATE (□, St 1 ) iPRINT CHR*(0 



30 CALL COLORC 



=40 THEN LOCA" 



:INT CHR* (0> iLOCATE 



. RETURN 

, CALL COL0RC"1Bt>") 

' M=1iL0CATE (R.TJiPRINT CHR* ( > iLOCATE (R,T+ 
I T=T+M:LOCATE (R,T):PRINT CHR*(4) iLOCATE (R, 
I IF T+1=40 THEN LOCATE (R,T)iPRINT CHR*(0);L 
I RETURN 

! CALL COL0R("1BC") 

I M=-1iL0CATE (XjY/'iPRINT CHR* ( 0) iLOCATE (X,Y 
. Y-YtMiLOCATE (X.Y)iPRINT CHR*<8 > iLOCATE (X, 
i IF Y=*1 THEN LOCATE (X,Y):PRINT CHRK0);LDCA 
', RETURN 

I CALL C0L0R("1Bb"> 

> M=-1iL0CATE (R,T)iPRINT CHR* ( 0) iLOCATE (R,T 
I T=T+MiLOCATE (R,T)iPRINT CHR*< 14) iLOCATE (R 
) IF T=1 THEN LOCATE (R,T)iPRINT CHR* (O) iLOCATE 
; RETURN 

t I=Xt1 iF=YiC0*="1RC" 
i CALL COLOR(COS) 

; LOCATE (I,F)iPRINT CHR*<0 ) i 1=1+ 1 iLOCATE <I,F)iPRINT CHR*(10) 
' IF I=R AND F=T THEN CALL SPEECHt "L, " SEXP*) iLOCATE (I,F):PRINT CHR*(12) 
1 IF I=R AND F=T THEN PAUSE liLOCATE (I,F)iPRINT CHR*(0) iS1 =S'I +5 iRETURN 
) IF I»17 THEN LOCATE (I,F)iPRINT CHR*(0) iRETURN 

) IF 1=0 AND F=S THEN CALL SPEECH£ "L, " tEXP* ) iLOCATE (I,F);PRINT CHR*(12) 
IF I=D AND F=S THEN PAUSE 1 iLOCATE (I.F)iPRINT CHR»(0 ) iS1=S1 t 1 OiRETURN 
i IF 1=10 THEN C0»="1Rb" 
I CALL COLORC 1BC"> 



1 PRINT CHR*<0) lY 



iPRINT CHR*tO) 

1 ) iPRINT CHR*<5) 

ATE <R,T+1):PRINT CHR*C 



NT CHR*(0) 
INT CHR*(9) 
+ D1PRINT CHRt(O): 



RINT CHR*(0) 
iPRINT CHR*(13) 
,T+1)iPRINT CHR*(0): 



LOCATE (0,S>iPRINT CHR*(0) iLOCATE (0,S+1 

i LOCATE <0,S>iPRINT ,CHR*(&) iLOCATE tO,S + 1 

; IF" S. 1=40 THEN LOCATE (0,S)iPRINT CHR*{0 
' GOTO 155 



PRINT CHR*<0):S=S+1 
PRINT CHR*(7) 
LOCATE (0,S+1)iPRINT 



1-I1LOCATE (0,P)iPRINT CHR*C 



(0,P)iPRINT CHR* 
i(0)iRETURN 
"KEXPOiLOCATE 
(0,P)iPRINT CHI 



< G-R-1 iP=TiC0*="1Rb" 
> CALL COLOR(CO*) 

LOCATE (0,P>iPRINT CHR* 
! IF 0-3 THEN C0*="1RC" 
) IF 0=X AND P=Y THEN CALL SPEECHC'L 
. IF 0=X AND P-Y THEN PAUSE 1 iLOCATE 
i IF 0=2 THEN LOCATE (0,P)iPRINT CHR 
. IF 0=0 AND P=S THEN CALL SPEECHC'L 
' IF 0=Q AND P=S THEN PAUSE 1 1 LOCATE 
i CALL C0L0RC1BC") 

I LOCATE (0,S)iPRINT CHR* (0 > 1 LOCATE <Q ,S + 1 ) iPRINT CHRi 
1 LOCATE <0,S)iPRINT CHR* (E) iLOCATE CQjSt 1 ) iPRINT CHR* £7 

IF 8+1=40 THEN LOCATE <0,S>iPRINT CHR*( 0) iLOCATE " 
!. GOTO 170 
: i »«#**»»**»**«*«* 

"JEXPOiCLS "RRR"iCI 



' CLS "RbC'iCALL COLOR 
I LOCATE <5,12)iPRINT 
I LOCATE (12,15) iPRINT 
> LOCATE <14,15):PRINT 

IF S1>S2 THEN 
I IF SK52 THEN 
3 LOCATE (18,12: 
t A*=KEY* 
i IF A*="0"OR A*="OUI"THEN 9i 



LOCATE <0,P):PRINT CHR*(12) 



0) iS=S*1 

PRINT CHR* 



(16,61 

"UNE AUTRE PARTIE" 

ELSE GOTO 197 



LOCATE (12 


10)lPRINT ' 


LOCATE (13 


10) iPRINT : 


CALL COLOR 






18) IPRINT ' 


LOCATE (13 


IB) iF'RINT ' 


CALL COLOR 


"OYBLHF") 


LOCATE (12 




LOCATE (13 


2B.) iPRINT ' 



I PAUSE E 

I CLS "CCC'iPAUSE 1.IELE 

1 END 



•RRR'^PAUSE 1iCLS ' 



LES LIGNES F'RECEDEES DE ! 
SORTING JF.CO.THE SRIFE 



ETRE OTEES 



RAID OVER COUCOU 



USX' 



fl. ..,£ |J= OCT 




AIR FORCE 



Gloire aux valeureux pilotes qui.malgre la difficulte 
croissante de cette mission, auront le courage indicible 
de la mener a terme. Des volontaires ?.. 

Alain JONQUET 




SPECTRUM n *' !& * ''* 



78 REM 



■' ■■■:':-■ ■ 



PAR A.JONOUET 1^: 

B30.LE HAMEAU = = : 

33266 LA TESTE ==: 

SPECTRUM t ..: 



"I FOR I 

1036 FDR 

.68, lid 
1B37 PR II 



• B TO 38: NEXT F 



i5e cCEfiR'eiEBeT'iEEPTi'aB - "' 

136 BORDER 1: PAPER S: INK 4 C 
-S I GO SUB 8666 : 90 SUB 9960 

14.6 PRINT AT 88.10; INK I) BRIG 
1T 1; ■'§ A.JONQUET 108S" 

156 CO SUB 9756: BEEP .1,36' SO 
BEEP .1,38; GO SUB 9aa 



170 RESTORE 9400 



1 to see step 5: eeEP 

PAPER 

Bin: next ■: lei n*R 
1649 FOR F.6 TO M: NEXT F: BEEP 
T gggo 



.158 FOR 1-6 TO . 



850 RANDOMIZE ( 



.i.ou: uu si 

1647 return 

10*9 LET uie-vie-i LET DCfi.a 

iB49 if uie«o then oo to sees 

ibsb RETURN 

IMS REM ■■■■■ RTTRCUE ........ 

ieee beep .bb.sb: print at x,a< 

INK 6;"1 , «" 

nee oo Sub 230a 

111* LET T-B: PRINT RT X,a8;" - 
1136 LET R.3B1: LET P. 326 

.., ::■-, -,. „ 16,6iRftr ■ 



let r 



if i 



205 RETURN 

a S° LET TRBjbT LET*RET-i: "et"k 



1145 IF TjygO'THEN PRINT ( 



18, a 



. VARIABLES : 



C.B: LET BZaB: LET ENw„ 
393 LET UIE-*; LET 30.8; LET 
1 :T " :B: LET DCA.r 



LET E*>' 



395 LET M-8: LET PE-8: LET 
■.ET F«."t" 

B: let 

328 PRINT RT 17, B; INK 1; PRPER 

ttsttn BKara ■ ■ ■ ■ 



nee f 






i 00 SUB < 



!■•■' 

B;RT IB, 

Rt is, as 



, . ,*j« •■>( 

335 PRINT INK 8; PRPER 5 

:.. -F\;t>.i- ;<t~. ;,;■. ■:•:;:..;- -v 

;'-kc";rt 88,a4; ■ret 1 ' 

33B PRINT INK 6; PflpeR 6;RT IB, 
t RT ie,5;K.;RT 3 
Bia7;KJ; INK 1JR+ 10.13; PRPER 
; - SCORE '■ 

335 LET p,.>" Cafg! I I I l«Fg [el ld«F 
LPrqqfilc (iv EIIF F( 1 f ff Fgl«FgU <d 
:■<■:■: i.:«p«i.-; 

"^rqfeqrqqqqvj Lii f f r 

■Prpr f (U7?g E E E r. E E E 



i gq^to 
s'then"" 

' '.45 II 

--SC-16 ' 
1155 IF INKEY 
LET X.X-l: PR 

X,a»; INK 5; 
1166 IF INKEY: 

LET X.X+1; PI 

.;r.-, S 

INT RT IB, i 

-1: LET P.l 
i-. vw, aJB 3B0B ; GO I u ■ .■.-■ 

jj 7 s u j'iS:s bv, -" b " BK ° ">» ™™ 

}J22 1F x "i° THEN 00 TO 6BB 
1188 IF T>786 THEN LET T.B 
1 i M „5!L pt<lBM ™ CM PRINT RT 11 
,8; PRPER 5; 
1105 IF U-l 
8608 
1880 PRINT RT 16,6;RflP TO 



1,36;EB;P,T 

-1,36;E*;R 

P To R>; : 
IF P.l THE 



LET P.P-1: 



f pehbo'tmen 



IF t 

. - nae 
i o ■ AND x<ie 

;«| i( -ht x-i,ae 

... "LET PEfPE-4 
PRPER Bi INK lj 

"■ go to aeee 
iB.ejRr •" - 



; 1. 1 i: 



. C-t EC I. 



1 1 1 c t c ct 



; I : ■ [ ■ 



i ten 



1 Ci j [ 



()3 AND T>BBBI THEN c 
1 RNO X> 



SUB [ 



.ET X-X-l: PRINT f - „. . , .■,■ 

336 LET X«16' LET DCH.6 X,a6; INK 5; '■„■.■'■ 

.^KTiSStre-r^ " a ° jl4 $K|?.^n^MEBTET N g| ¥ .sS:SeB? B L C I 

3 §l ft S5i B *" e:+M ' !N °° 5UB 1B0a I"«Sf kc-1 rno DWEr|.- S - or i 

3*6 LET 0.351 : LET P.320 NKEYI-'O' 1 THEN PRINT RT 16,37; I 

341 IF UIE.3 THEN PRINT Oil INK £S *,-,_ "3 = , : f-gl ^"2 : LeT T) <-e: 

B: RPPRREILS 1 1 1 ( i i" SQ » u 5 1BBB: LET TaB 

343 IF yiE.a THEN PRINT Bl? INK ^ a ?S k 5 : T ^ig-I M E N „E SlNT RT 18 ' 27 

5:" RPPRRFTLA j . t i " ' .INK B; PAPER B;KI 

343 IF P UIC" L ?HEN PRINT J »l; INK "g» gg TO «»•-"„„„„ 

g;" RPPRREIL ij" J3?2 PEC TV;? OOHBAflDEnENT--... 

344 PPINT INK 3; PRPER 5;RT 36, *3*| J-|j BH*£| print bt 
S 345 H PRINT E RT 16,e;A»IP TO R);RT H5 li PAPER 0;N: IF MtlBB THEN P 

xTIe; INK 3 ■iJ"i' LET P.P-1- L RINT PRPER OJRT SB,B;" "i IF M(l 

ET Rifi-1 IF P.l THEN 00 TO 1855 ?-I H CN PRINT PAPER Bi RT 3B,7;" " 

35S let PE>PE-a: print rtibTb" , 1 3?* d p S i BT pJ_".SjS»<ptS r!;, 

INK 1; PAPER s-PC LET B"™- 1; LET P"P-1: IF Pul THE 

36B IF P?a75 fHEN 00 SUB 70B H. fT- 1 *-!- a S0 , H> =»gf : >-Ef BZ. 

3B6 IF INKEVs-'B- P.ND P;a46 PND ?i-t ET .? "2 2 Si. LE ,' -S'SS 1 ^. -, 

X<16 THEN LET X.XH PRINT OT X l 5 a S LET B»B+1: LET PE«PE-a: LET 

-S al;i™BT 'TsS' iSk b? ! ij-"St IjTJli Ei|8*„"T ■>»'! wW 

Xa&'iNKfl'Ft ' AT 0-1,37; 

30B IF P(3BB THEN PRINT AT X.SB "96 IF B*i.B THEN 00 TO 13S6 

INK 3;Fi i 3 *" *L_™ *™ THEN BEEP ,6a,-4B: 

p 39S IF P(B6 THEN PRINT RT X,3B; K R | nt nfep «' -SB *'' DRI0HT 1; 

4BB PRINT AT 16,a;A»(P TO Rl;RT 1 ^S5 H I r,? '3S 8 »^2,. P>a7a flND B = 1 * 

X 38- TDK ET R.R-l' L THEN LET BC»3C+8B 

ETrSr-iTiF P.i ThEN 00 TO 16BB ^JSn^-? * 5P B «8?S« P> 1M " NIJ °" 10 

43a tf p/9Rn thfm PDTNT ot v am THEN LET 5C*8C+7B 

; INK a'F< ' 1+1= *' P'HO «ND P>93 AND B.1B 

435 if P<aee and p>bb then let T M f N ts 1 - 8 ? ? a SuS B D . , -. =^^ . .--- 

P-P-3: LET R=R-3: LET PE-PE-9 HFN*L FT ?riir!lS P>17 0hU1 °" 1S T 

446 IF PfllE AND X.1E THEN GO T rlfiN_LET sC»B0+3B 

o see ^* i * D """ *■ iD lnc ™ wu ' i486 if Pisis rnd p»sea and b»ib 

445 IF P>375 THEN 00 SUB 766 iiQ| N T k E I,SS"SSi+S,„ Dwr , . ,. _ 

480 IF INKEY*. ■'7" RNO PlS4B RND ij? 9 , - F P 4 B S^?^§«° ' S8 BND B " 1B T 

X>1 THEN LET X.X-1 ■ PDTNT HT X* HEN LET 80.80+138 

1,3o;e3;AT X B6; INK B;"ii' i 'RT X lt - s ' B lp SC<ie6eB9 RND SO IBBBB T 

.ait "k a;Ft ' H £ N a S HINT * aS -" ; Sflpcfi B; INK 

.,46e IF P<BB THEN PRINT AT X.ao; JJp„ aC)lgMa ftNIJ 8C>1M8 TH= 

47B IF P*85B RNO P>88 AND X-18 N ,P R ^ T o g T 1 5 B 1 '.Ji 0; PRPCF1 B; 1NK B 

T g|S ^ T TS fi 3Sl +B i2?e fl If a l6itBel and sc.iee then 

ht"! ■^■T[3p Ta Si ?»4( DRI ° i7T 5 PAPEl c 8^!NKT s S?Rr3gTiS?''' 

H 63 ?' PR f^. fl S ce §' a S 3 '? N 5 t7 i BRI ° S+ee if e.ie then oo to i 3 bb 

645' print' rt 16,387' ink i "111" JhU&'EP&IJFV ithnPi- 

BBS BEEP .63,-36; NEXT I KjJffT Erf** 88* ™ S ' 0R:C0HT *' 

JW.HSW flT l8 ' aB; INK a ' BRI " i49e-i? e ic>B!ee"THEN LET U-l 

>| r dS^ i,B,.7B,B..aB,e,i,g,i. iggg 2etSrn" MBB ™ EN LCT U '* 

io l01B B EH ■■■ RAyiTAILLEMENT ■••■ 

'66B RESTORE 668: FOR 1.B TO IB: JSi 8 b|iNT"nT J -i« L a T QSTp a TO Ol - , 

READ A,B: BEEP O.O: NEXT I IF? oSb l! i WToiS' ?* TF 8.1 +MF 

006 GO SUB 1668: 00 TO 366 N BO SUB SObST BO TO'lBlB 

7BB FOR FfS'tO 6? U NEXT """°*" 153B PRINT INK 4;RT 3,Y;" fcfino"; 

716 RETURN 1B4b'lEt'tx-TX41: LET PE.PE-3; P 

■ B !L^| M *V5"" B *^ C "" NTT "° **'■* H " TxiaSHEN LET^-ySi'^ET 

ills B «P°.- 8l f B EN B == p p ^|'J B "tie 1 " V-1 ™ EN PL0T a ' O0; DRRW 

16B9 BEEp" a il,-I" PRINT'PT 16,6; HSJ ISjXJ"!! Ts E a. R»Tp Y T0 1 R: ■ - 

INK 7;"dl^xyiCI(rq] CiJIlJ CiJCCi [_ ET p fi p_j_. [_£j piR-i- if P.l the 

fell PRINT 0+ 16,0; INK «i."lt)(HJ" iHBB IF 6 INKEY»."7 liT DNR 5 Xll THFU 

CT o: BEEP .BB,B: FOR F.e i ft v.x l . DRTNT ot x*i it- i. ■ St 

TO 86: NEXT r- PRINT PT 18,5; P X 26 INK B --.i" x + i ' i& ' E -' BT 

?6lffl F6R P-PE TO 64BB STEP 14 18 |° J^xJl- E pS J'nt"rt N X If 'IS ■UPS 

leas PRINT RT IB, 5; INK li PRPER T X B6* INK B-"2*" X-l,8B,El,H 

p rliiSi bmp Ti.ae 1B7B IF Y>=Bl fiND Xn * ™ EN BSEP 

163B PRINT PT 3B,5; PRPER B; " i BO0 a0 T q 1B36 



I 90 SUB SOBB: 30 TO 1616 
.535 Ll~ —■ -■ " 

r let i.. _ 

1670 90 TO 16&B 

1710 LET R«3HJ> LET"P-5Ia~" 
1715 PRINT AT 16,«;RliP -" 
LET P.P-1: LET R.R-l 
173* LET PE.PE-1: PRINT 
INK l; PAPER OiPEi IF < 

"; ,' ] : DO 1UB 3666 : L 

_G0_T0_1 

PLOT B^OB: 



S THEN P 



INK ' 



I LET \ 



174B LET TX.TX.l 

1756 SO TO 1715 

1S9B REM =- 

2061 PRINT PT 19,13J PRPER 5;' 

3103 LET TRB=TRB+1: IF TPB>=5 Th 
EN LET TAB.B 

EB65 IF RETsl AND EN=& RND BZ'6 
AND KCB THEN GO SUB a6S«: BEEP 
.65,36: PRINT INK Bjffl >'..■(... '3»" 
36B& IF SO). 16666 RND DCAsB AND 
KCa6 AND BZfO AND EN. 6 THEN GO S 
UB 7366 

aeo7 if ; 

3668 IF I 



;»2B THEN 00 sua 



(JtllJ [ClliJ CCqqriLlrlt Ull tq<U 1 
t*»tli J [ [ [ irqr— 93 lqro™(i J [1 J [nnq 

t£ttct [[[[CC tttctf CCItlC" - 



t LCCCCCEICE 



LET P-336 



3666 LE" 

3665 PRINT RT 16,6; Al 

x.ao; INK B;"i J" 
£666 IF P<156 AND Pitl7 RND 

THEN PRINT RT X,a8; INK 8! ' 
207B LET F - - 



3B75 LET PE.PE-3: PRINT AT 18,5; 
INK li PAPER 5JPE: IF PE(166 TH 

i - aoae 



2677 IF IN«R ■. 



'RINT f 



366 



sees if P;^;;.«<«. 
aes3 

: ,:>^. 
3BB4 ( 

aess if inkeyi 



>B THEN 00 3U 



INK 6; PPPES 6;KI: LET RET=B: 
-TURN 
3384 PRINT RT X,36; INK 5;■■iJ ,, 

IF INKEY*- "a" AND XH6 ANL 

■ 

Ei.RT X,SS; INK E; " i j - 

3686 PRINT RT 16,0;Af(P TO R);f 
' " —IK 6;"U": let p.p-1: L 
IF P.l THEN PRINT RT S 



2636 

NT A"i xv ,*f ; 4.NP. *;:•:.. 

aiee if <p<i3b or p>iaei and x-i 

6 AND RXol THEN PRINT RT <"" ~" 

INK e; PAPER B,K«: 00 TO ( 

ane if pais and RX«e thi 

T RT 36,87; PAPER 6; INK i 



: P<1B6 AND F 



2146 GO TO 2865 



... TABLEAU I 



ctV.J-l'ILcEi.Sb'tlblii t (iri^cTc W 
iaii,-,-,-i[,-iwxii\i'si i\i wi t\3 

iHddi.iKi.aiumiiif'mijui 

tm (d 1 lien [./[»bcabb[[»bl»blabb 

I . ': ■ ;t •.-.',.. ■:*-./■;: >. -n, 1 1<\ ■•, <t 'i ; ' 

I I tim ctd ci < tu.«f fff r r Ff r r fsuit 

i .: i ;■■■■ . , I ■:.■■•■ ■..'■■'..,'..: 
abL_f[_£[_£[iCsFs! ! ! I larg [c( (deF 
2196 RETURN 

■'-:-: ... = i . TABLEAU 2 ...... 

LET A*. 1 cersl ! ! I I s <1 [C ( (d« F 

;. I «-.'} ' I ! I ! f f 3 I ( [qqluq 

■n,- iv Ui'.'UbiUqr] [[. ( t(d (d iltti 
M >] !\i n.idiidaiccc id (id 'el t ft*' 
• ■:■> ' ■ ii'.iii-:. .;:■ ■ (.:,.;.::■ 

..." l'~T,i.-atr ■ I:-::;:::;.- t t 1 C C [ [ I i (CL 
■. .<! ::.-: C[cimabL*bli[./[,/[LtL£l 
_£[<iLBfrfFFSVVlUfilWfUL,-,-(t 

2296 RETURN 

2360 REN ..=.== TRBLEAU 3 ..g... 



3385 LET A« = " [t 
Ffgl ! !e 9 ( (d<[[> 
tabCabL./[_£l_i 

( ccc Cd [vl«9' M t 

k< ic tc ( c tc-./[i_£t_e[_£_ti^£t t_e 



_£Cl_£i. t_£t 
qqqvTCqqrqv 



R* = " [tF9l I 

tffgl I lt/5 FfVtltld 

«Fa «gtlijtij[iJLijt9rqJii«b 

:.h"\ -. i;.; ; :;.,..£ ■ ■.'■u- ; ; iiit.,*;>;. 

if «f-'-j-j 

g:idi.Uic((ic((d[dt(C(d(c([rq_Lt 

■ ■ .-■!'■}'. I 11 HFgLCIIdtF 



2460 RETURN 

aeeo rem ■■■>>■■>> .......... 

3538 FOR F.8 TO 4: NEXT F 

2535 RETURN 

3685 REM ...•.■_PLU8_DE FUEL 

BEEP 



. _. .0 TO 33B5 

3885 REM ..... RUION ENNEMI —■ 

3«15 IF INKEY. <.'" THEN RETURN 
3B36 LET YE-1: LET XE=>' ""■- 
T XE,YE; INK t " ' 



LET EN-0 

-„,-,..J(P TO Rl; : 

LET p.P-1: LET R.R-l; IF P»l THE 
N LET EN.l; 00 SUB 2808: LET EN. 
O; LET R.351: LET P.3BB 

3833 LET YC-YE+1: PRINT RT XE-1, 
YE-1;E«;AT XE + 1 ,YE-1; El; RT XE.YE 

3834 IF'EN-e THEN PRINT RT X,28; 
INK Si" J*" 

3835 IF lNKEY»-"S" RND X < IB AND 
EN.B THEN LET X«X+i "'"INT RT X- 

1,26,E*,PT X,26; INK 5; , ■.■,'•■ , 

3638 if INfi.KV «■=■■?- 'iK!> XJl RNO E 

N.B THEN LSI '-.:<.-... PBMT RT Xtl 

,36;E«;RT X.26; INK S; , 'J"." 

3848 LET XEiiX: IF XE<3 THEN LET 

3658 PRINT F 



IF P-l THE 



36B2 LET 1 

ye-i;e»;r- 

3685 If'.EJI 



I SU5 3355 



OO SUB 32(55 

3191 IF YEnS. ., ... 

3193 IF YE-37 RND EN.0 THEN RETU 

3193 IF YEra? RND EN.l THEN GO T 

3195 00 TO 363B 

3308 REM ..... TIR ENNEMI .=.=- 

3818 FDR F.16 TO 80 

...„-,. :■■..'!! " XE,F; INK a; 1 ' i"iR 
T XE.YE; INK 41 ' f*" NEXT P 
3238 PRINT RT XE.2B; INK a; BRIO 

i-: £{": BEEP .03,-20 
3235 PRINT RT XE.26; INK Oi BRIO 
HT l; " I I": BEEP .03,-40 
3848 PRINT RT XE,3B;E«; BEEP .02 

,0: RETURN 

32S8 fiEM ...... TOUCHE ? ...... 

32B5 IF XE.X THEN LET EN.l: LET 

3CSC-300 

3308 PRINT AT XE,38;E.: IF EN.0 

THEN PRINT RT X,8B; INK Sj"i"" 

i--.-A RETURN 

3380 REM .... RUION AORTTU o... 

3395 LET EN-O: LET TZ=8: LET T.8 

: .PRINT AT X,B8; INK 2; BRIGHT 1 

3386' PRINT AT lO.BjAtltP TO R) ; : 
LET R.R-l; LET P.P-1 
3310 IF P.l THEN LET_EN. 1^,00. 5U 
P.328' 



LET Eh 
3330 "LET 

333B IF' 

INK a; 

3340 IF T.8 THEN LET T.6: LET TZ 

=TZ + 1 

33B0 IF INKEY. •"»" OR INKEY"."."!' 

THEN 00 TO 3468 
3360 IF TZ.3 THEN SO TO 3588 
3390 00 TO 3308 
3460 REM ...... EJECTION >■.■■■ 

3465 PRINT RT 19,13; PRPER 5;" 
■: LET S.X-i: LET T.8: LET 



INK a; PAPER 8, E, 




A suivre ; 

En raison de la longueur 
inhabiluelle du listing, 
nous passerons ce pro- 
gramme en deux tois. 



> REM .-JDESCENTE PflRRCHUTE« 

INK F;"*K'-: BEEP .825,-30:' 

r ink f;rt 16, as; ■■ itr 1 : beep 

■, aaE '""i2i^ PR I9 T INK ! ' fiT 18 ' a5; 
i S8 ; ' NEXT F ; LET 



BEEP .OE.r 



...,.■ b|m ... TABLEAU 1 D.C.A -«. 
2liB | LET fil.'Ulg! ! ! I > tf« Ec ( Cdar 

.■■. ■■.■■■: 

(d I (E./lUXl Id E^EEqqa] U [IbEablUX 
CtlditcEIIeFFfTff/BidEKdEU+CEt 

tJXU ("did' EllfTltlib 

ii.ii;;([|IJM!lll!!M«gHr;U':.! 
id <c LU E El I . ■ Ei ■■■; i<( ( I Caqr L [ 



i o r> 
3606 r... . 
ink a; prper ; 



J 5 S I E 



3628 IF T.25 THEN LET S.S+I 



3640 GO 
3850 SEE 

-8C 4-1880 
3060 REM 
3710 LET 

3730 LE' 

■■■■'■ 

3740 LE" 

1 1 

. I 

y.'s?. ... s 

;v/etj ..•;' 
37~fl .. ::' 
3775 LE' 



LET 1 



3685 IF 5.18 THEN GO TO 3645 
3640 GO TO 3810 

3650 BEEP .1,-38: PRINT AT 8.SE; 
'■ ";RT S + 1.3E; INK ♦;"!,": LET sc 

sc+iaeo: oo to ess 

-660 REM ..ana TIR D.C.A. .... 
3710 LET YD. 18: GO TO 3775 
' ■ 3775 

'5 = 17 

YD^22 

-■■ :■-.■■'■;.;■; 
■ :■ -.- ; s 



v[».: 



■ 31 



3775 
3775 

■-; :;■'? ''S 

O 3775 
3775 
3775 
3775 



15: BEEP .86,-36: 



'...-"': ■■'-' 



DKMni 4., I 

37B8 LET X^-.X!, ■ 
3765 PRINT K] «l 
T XDtl.YD-1;" ■', 
3796 



INK 3;'V; 
;,:>; INK 5; 



THEN 00 TO 3088 
_795 IF YD.37 OR XD<2 THEN GO TC 

36S6 
3880 GO TO 3760 

3846 REM ■>.■■• EXPLOSION >i==.= 

— SO PRINT RT XD.YD-1; INK 4; " I I 

BEEP .05, -IB: PRINT AT XD,YD- 

"NK ej'-tf'jBT XCYD-li" "■ E 

■85,-38: RETURN 

REM .-■-.. TOUC.._ 

3980 FDR 1.1 TO 7: PRINT INK Ij 

bright i;rt x,36;■""■ 

1-30: PRINT ;, : .. 



3795 

3880 
3846 _ 
3850_PR: 

"■"at XD 

...... RETURN 

EM a.*.... TOUCHE ■: 
—380 FDR 1.1 TO 7: PRINT .... 

>:..:■■.'• ■■. .^- x. J:i. ■ ■■;>.■■. $W' 

--30: PRINT INK I;RT X,86i"l1 : 

BEEP .88,1-46: NEXT I: GO TO 329 

5 

5995 REM <»•<■ MISSILE ........ 

6885 LET U.INT rRNDIHI +8 
tOap^FOR^f.l^TO^aO: PRINT RT U,F 

-35'then GO TO 



6060 IF U>> 

eaeo 

6875 NEXT f 



■RINT 1 



j, as, ' 



6156 REM ........ TOUCHE ....... 

eaeo for i-i to 7: print ink i; 

BRIOHT l;RT X,26;"tf: BEEP .82, 
1-30: PRINT INK I; BRIGHT ;..;-■- 
,26;"ll": BEEP .8S,I-iB. NEXT I: 

GO TO 3895 
7805 REM an...... D.C.R. ■■.<■■■■ 

7840 LET DCR-1: GO S'JB 2408 

70B8 LET P. 386: LET R.351 

705B PRINT INK 2;AT 19,14; PAPER 

6;" DC A";AT IS, 13; PAPER 4; I 
NK 31 FLASH li"«" 
7068 PRINT AT 16,8; At IP TO R) ; : 
LET P»P-1- LET R«R-1: IF p.l THE 
N GO 3UB 2860: 00 TD 7650 
7078 IF P«2r ■ 

: ..... .::- " ' : " ; 

7886 : 
7898 I, . 

7aeo if > 



... J710 

7886 IF P. 27 THEN 30 SUB 37B5 

7888 IF P. 817 THEN 00 BUB 376B 

7890 IF P. 808 THEN 00 SUB 3748 

7886 IF X.16 THEN 0" tii hdih 

7370 PRINT RT 18,8; 

LET P.P-1: LET R«R-_ _ 

N CO SJB 2006: SO TO 7BS8 

7375 IF PalBB THEN GO SUB 

7236 IF P. 33 THEN 00 SUB 3735 
7390 IF INKEYM 

■ *s 



.-■;■}» 'INK sy ,T i»" 
72gB IF _INKEY«."6 



P.l THE 

■■35 

THEN 

Xtl,36;E«lRT 

' X-l,36;E«;fl 
1NE> M>0 THEN 

.1 IF P.l THE 
:INT AT 16,51 



3410 PRINT RT 16,BlRiCP TO R)J: 
LET R.R-l: LET P.P-1 
3480 IF P.l THEN LCT EN.l: GO 3U 
B 2008: LET EN. 8: LET R-351: LET 
3438 IF 5>6 THEN PRINT INK 6; AT 

■:--i ,;.-.*=. - ■ -■■' i ■-,■;. ■■:</ . Ki s .iiS. 

INK B'i"£»" 
3448 LET E.S-l! IF 5<0 TMEN LET 

: ■■■■?. L i" '.,:■■- i 

3441 IF X=17 THEN GO TO 36B8 

3445 IF 5-8 THEN PRINT AT X-l-,86 

;■;„ ";,flT X,26; ink S;"*;st 1,3 

3495 SO TQ 3418 

3B60 REM ... DESCENTE RUION =..= 

3S10 PRINT AT 16,0,A«(P TO R)l: 

LET R.R-l: LET P.P-1 

3SS0 IP rHEN LET EN.l: GO SU 

B 3008: LET ENaO: LET R.351: LET 

0.320 
3536 LET X«X+1 
3546 PRIbjf AT X-1,26;E*1AT X.26; 

INK 2; ' ■;*" 



CD SUD 1346 
7305 PRINT RT 16,8; 
I FT P.P-1: LET R«R- 
00 SUB 8886: GO 
...- T _ 6 . p 

., t-MrcH b;pe 
... .'RINT RT l6,e;R.lP TO R 
LET PfP-1: LET RsR-1: IF Pil 
N ; 00 SUB 2888; GO TO 7858 
7425 IF Piaa3 THEN DO SUB 3780 

7438 IF P.314 

7435 — -■■■■■ 



7468 IF INKEY*.'^ 11 RND X < 16 THEN 
LET X.X + 1: PRINT AT X-l,se -...■. 
T X,86; INK Bi"2»' 
7498 PRINT AT 16,8;A.CP TO R) ; : 
LET P.P-1: i_&"! fftfi-I IF-" P.l THE 
N GO 5UB 2088: 00 TO 7058 
7820 LET T.T-tl: IF TH78 THEN LE 
~ 00 BUB 688B 



as 



7B35 IF P-3B THEN 80 SUB 3735 
7540 IF P. 386 THEN GO SUB 371S 
7558 IF INKEY*. -S" OR INKEYJ: 
THEN LET RET.l: PR 

'.,:. ;.■. ■ ,,-. ■■ 
7SB5 IF PE I 1B6 THEN uu i u igvi 
7B68 IF PE<1888 THEN PRINT AT 
.8; PAPER 5;" " 

7B78 IF X)9 THEN GO SUB 3088 
7688 GO TO 7860 

S49B REM =»»*. PRESENTATION =: 
S51B BRIOHT 1: 00 SUB BB0B 
«-;,«;■ l.NK <■ 

FORCE": EEEP .1,16 
8585 GO BUB 9345: GO SUB 9950 
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THE CASTLES OF DOCTOR CREEP 
DE BRODERBUND pour Commodore 



Franchement, etre transfere aux 
bureaux transylvaniens de la so- 
ciety tut I 'une des epreuves les 
plus eprouvantes de toute ma 
carriere. Charge de praliquer 
une expertise system atique de 
tous les chateaux de la region, 
mes predecesseurs dlsparurent 
tous en mission. Mes superieurs 
noterent, dans mon dossier, ce 
transfer! comme une promotion. 
Si onze specialises disparus ne 
les impressionnaient guere, ils 
ne m'en choisirent pas moins 
par mon manque d'importance 
dans la structure globale de la 
societe. Des le pied pose dans 
la chalne des Carpathes, mon 
sentiment d'angoisse s'amplifia. 
Les demeures imposantes des 
anciens seigneurs des lieux do- 
minent le paysage lugubre de 
leurs tours creneTees, conferant 



au site un aspect fantasmagori- 
que qui m'empecha de lermer 
I'oeil de la ntiit. A I'aube, frais 
comme un gardon sur le sable 
depuis deux jours, je dirigeai 
mes pas vers la demeure an- 
cestral© d'un denomme Doctor 
Creep. Chemin faisant, une gar- 
got te ouvrit son volet de bois et 
laissa echapper un tumet qui 
m'attira irresistiblement. Confor- 
tablement installs devam une 
soupe au lard, j'essayai d'obte- 
nir quelques renseignements sur 
V occupant du manoir. La vieille 
qui m'avait servi se signa et de- 
bita un nombre impressionnant 
de charmes pour proteger sa 
maison. Son nom me me conte- 
nait une menace qui transfor- 
mait le visage de mon hotesse 
en un masque deforme par une 
peur atavique. Lorsque j'evo- 



quais la presence passee de 
mes collogues disparus en mis- 
sion, son oeil jaune brllla un ins- 
tant avant de reprendre son as- 
pect terne et chassieux. D'un 
filet de voix enroue, eile m'ad- 
jura d'eviter ce lieu maudit et 
tenta de me faire abandonner 
mon projet, allant jusqu'a me 
menace r de rencontrer mes 
amis . Reconforte par son brouet, 
je me dirigeais d'un pas noncha- 
lant jusqu'a la grand- porte et 
d'un coup brusque fit resonner 
le heurtoir en bronze. Silencieu- 
sement la porte s'effaca, decou- 
vrant a mes yeux un long hall 
desert. J'entrais et regardais la 
piece, decouvrant avec stupeur 
les multiples appareillages me- 
caniques et eleciriques jonchant 
le sol, couvrant les murs et 
mSme pendant du plafond. Ce 
n'est qu'en entendant le bruit 
sourd du battant se refermant 
dans mon dos que je realisais 
que j' eta is prisonnier. Durant 
quelques instants de panique, je 



tenta is vainement d'entrouvir le 
lourd panneau de chene, mais 
meme un elephant n'aurait pu le 
deplacer ne serait-ce que d'un 
centimetre. Les forces en jeu 
dans cet univers ferme depas- 
saient mon entendement. Les 
vieux contes cent fois entendus 
dans mon enfance rejaillirent a 
ma m^moire, me laissanl pante- 
lant et sans force. La puissance 
de la logique cartes ienne 
commencait une nouvelle parti e 
centre les forces du mal et de la 
sorcellerie. 

Les manoirs imagines par le 
Doctor Creep contiennent les 
points de reperes logiques d'un 
dement. Chaque mouvement, 
chaque action sur un element 
d'une piece agit dans le lieu 
mdme ou Ton se trouve, mais 
aussl dans d'autres parties de la 
construction. Une memoire vi- 
suelle et auditive assistee d'une 
concentration sans faille permet- 
tent de nercer les secrets de 



ces demeures et de recouvrer la 
liberie. Dote d'un graphisme ex- 
cellent et d'une musique plai- 




sante, ce jeu d'aventure sans 
aucun texte fascinera tous les 
fanatiques des casse-tetes vi- 
vants. A decouvrir dans les plus 
brefs delais. 
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PERIPHERIES ET ACCESSOIRES 

Impfmml. Enth« CIW* nwnfl.ur 

M.IOMipfclilQ.L 18MFD mmwdmiw IMf 

TnclwnlFkoto JMFD Weradtaqutlta* vldgM «F 

■uppMnUui MFD L0GICIELS EN 

MICRO-CARTOUCHE 





i 




95FD 
110 FD 
150 FD 
Budget familial B5FD 



75 FD 
7SFD 

Toolkit 75 F r 

Haute definition 

graphfque 120 F D 



BON DC COMMANDS 
PROMO SEPTEMBRE 




PERIPHEftlQUES ET 

ACCESSOIRES 

Carte 9 entrees/ 

sorties 39 

Carte 8 entrees/ 

anatoi 

Matt 

jeux 



395 FD 
le 

245 FD 



Mane 190 F D 

Interlace Centronics 

+ cable BOO F D 



Balls de match 
ObJectH Efysse 
S/imulataur de vol 
Echecs Le Turc 



Geitiondefichier 
G est ion de slock 
Tasword II 
Tascopy 



Alphacom32 1.190 f G 
Rouleaux de papier pour 
Alphacom 30 F D 

' papier pour 

Henettedejeux 140 FD 
Cable RS 232 235 FD 



99FD 
145FD 

95 FD 
115FD 
246FD 
194FD 
194 FD 
194 FD 
250 FD 
149 F l ■ 
1B0FD 
149 FD 
260FD 
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